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Vorwort 

Dies ist die erste deutschsprachige Darstellung des Diskettenbetriebssystems DOS 3.3 
fur den Apple II/II Plus/IIe. Im Gegensatz zu dem bislang nur in Englisch erschienen, 
ausschlieBlich fur Assembler-Programmierer gedachten Buch ,, Beneath Apple DOS" 
von D. Worth und P. Lechner, das das 48K DOS sozusagen bis zum letzten Byte seziert, 
aber infolge fehlender praktischer Beispiele im groBen und ganzen nur fur Systempro- 
grammierer von Nutzen ist, liegt das Schwergewicht des vorliegenden Buches auf der 
ANWENDUNG von DOS 3.3 sowohl fur Applesoft- als auch Assembler-Program- 
mierer. 

Der erste Teil behandelt ausfiihrlich die dem Applesoft-Programmierer zur Verfiigung 
stehenden DOS-Befehle, wobei die Textfiles wegen ihrer groBen Bedeutung und der ver- 
gleichsweise komplizierten Handhabung besonders eingehend dargestellt werden . Viele 
Tricks aus meiner langjahrigen Programmiererfahrung werden hier zum erstenmal ge- 
schildert. Aber auch im zweiten Teil findet der reine Applesoft-Programmierer insbe- 
sondere in dem Kapitel ,,Vermischte Tips, Tricks und Patches" zahlreiche verwertbare 
Anregungen. Im iibrigen ist der zweite Teil fur reine Assembler-Programmierer ge- 
dacht. Neben einer detaillierten Beschreibung der RWTS enthalt dieser Teil elf vollstan- 
dige RWTS-Anwendungsprogramme. die wie beispielsweise der TSL-Maker, der File- 
Reader, der RAM-Disk-Driver und die Fastbrun-Routine Techniken enthiillen, die bis- 
lang noch niemals publiziert (und wahrscheinlich auch noch nicht entdeckt) wurden. An- 
derenfalls ware es unverstandlich, weshalb solche ansonsten professionellen Anwender- 
programme wie zum Beispiel Visicale 3.3 oder Applewriter He 3.3 eine ..schiere Ewig- 
keit" fur das Einlesen von Textfiles benotigen. Unter Anwendung der hier erstmals be- 
schriebenen Techniken wiirde sich die Einlesedauer auf einen Bruchteil der sonst beno- 
tigten Zeit reduzieren. Bei alien geschilderten Verfahren und Methoden wurde auf DOS- 
Kompatibilitat Wert gelegt, d.h. es werden gewissermaBen nur , .Tricks ohne Finten" 
dargestellt. 

Bei den Anwendungsbeispielen wurde darauf geachtet, daB sie gleichzeitig einen sinn- 
vollen Zweck erfiillen. So wird z.B. die Fastbrun-Routine anhand eines Apple II Plus 
Emulators fur den Apple He erklart, so daB man mit Hilfe dieser Routine nunmehr auf 
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dem Apple lie Programme laufen lassen kann, die aus verschiedenen Griinden aus- 
schlieBlich auf dem Apple II Plus liefen. 

In der vorliegenden zweiten Auflage, die bereits drei Monate nach der Erstauflage erfor- 
derlich war, sind an einigen Stellen Setzfehler ausgemerzt sowie bei einem Programm 
(RWTS-Muster, Seite 113 - 115) vier fehlende Programmzeilen erganzt worden. 

An dieser Stelle mochte ich den zahlreichen Lesern danken, die mich spontan - meist 
auf dem Umweg liber die Auskunft - angerufen haben. Deshalb, wenn Sie Fragen zu 
dem DOS-Buch haben, hier meine Telefon-Nummern und Anschriften: tagsiiber 
06221/489-1 (Dr. Alfred Hiithig Verlag, 6900 Heidelberg, Im Weiher 10) und abends 
06221/800154 (6900 Heidelberg-Ziegelhausen, Rainweg 78). 

Eingedenk der Tatsache, daB sich ein Leser 48 Stunden lang vergeblich bemiiht hatte, 
den RAMDISK-Driver (Seite 170ff.) zum Laufen zu bringen, sei darauf hingewiesen, 
daB alle Programme exakt wie beschrieben laufen, wenn entweder das unveranderte 
DOS 3.3 von der System-Master-Diskette oder im Falle von Diversi-DOS die Version 
2-C verwendetwird. VondenneuerenVersionen, insbesondere4-C, muBabgeratenwer- 
den, da hier viele Systemadressen nicht mehr stimmen. 

Ubrigens liegt inzwischen die Begleitdiskette zum DOS-Buch vor. Femer erschien in 
diesem Monat der erste Band von , .Apple ProDOS fur Aufsteiger“ einschlieBlich geson- 
dert erhaltlicher Begleitdiskette. Da ich zur Zeit noch an dem Buch , .Apple Assembler 
— Vom Anfanger zum Profi“ arbeite, das fur August/September geplant ist, wird der 
zweite Band des ProDOS-Buches nicht vor September/Oktober herauskommen. 

Ulrich Stiehl 


Heidelberg, im Juni 1984 


VII 


Inhalt 


Teil I: DOS fiir Anwender und Applesoft-Programmierer 1 

1. DOS fiir Benutzer von Anwenderprogrammen 2 

1.1. Betriebssystem 2 

1.1.1. W ann soil ich ProDOS und wann DOS 3 . 3 einsetzen? 2 

1.1.2. Ist DOS gleich DOS? 3 

1.2. Laufwerk und Controller 4 

1.3. Diskette 4 

1.3.1. Reset 5 

1.4. Speicherkapazitat 5 

1.5. Booten 6 

1.6. Initialisierung (INIT) 7 

1.7. CATALOG, LOCK, UNLOCK, VERIFY 8 

1.8. Kopieren von Disketten und Dateien 10 

2. DOS fiir Applesoft-Programmierer 11 

2.1. Dateinamen 11 

2.2. Befehlsnamen 11 

2.3. Direkte und indirekte DOS-Befehle 12 

2.3.1. Direkt- UND Indirektbefehle 12 

2.3.2. NUR Indirektbefehle 15 

2.4. Parameter Slot, Drive, Volume 15 

2.5. Einfache DOS-Befehle 18 

2.5.1. INIT, CATALOG, LOCK, UNLOCK, VERIFY, DELETE, 

RENAME 18 

2.5.2. FP und INT 20 

2.5.3. MAXFILES 20 

2.5.4. MONundNOMON 22 

2.5.5. PR # S und IN # S 22 

2.5.6. LOAD, RUN, SAVE (Basicfiles) 23 

2.5.7. BLOAD, BRUN und BSAVE (Binarfiles) 24 



VIII Inhalt 


2.5.8. CHAIN 27 

2.6. Textfile-Befehle 27 

2.6.1. OPEN, READ, WRITE, CLOSE 27 

2.6.2. Struktur eines Textfiles 31 

2.6.3. Komma und Semikolon: PRINT und INPUT 34 

2.6.4. Komma bei Mehrfachfeldern 36 

2.6.5. Semikolon: GET und PRINT CHR$(X) 38 

2 . 6 . 5 . 1 . Applewriter 1 . 1 Binarfile-Konverter 40 

2.6.6. Komma, Doppelpunkt und Anfuhrungszeichen bei Strings 41 

2.6.7. OPEN-Files 43 

2.6.7. 1. ,,Schein-Mischen“ (Demo-Programm) 45 

2.6.7. 2. ,,Echtes Mischen“ (Registerprogramm) 46 

2.6.8. Sequentielle und Random-Files 54 

2.6.8. 1. Vorformatierte Random-Files 58 

2.6.9. APPEND, POSITION, BYTE 61 

2.6.10. EXEC (Executive Textfile) 66 

2.6.10.1. Bload-Finder 66 

2.6.10.2. List-Maker 67 

Teil II: DOS fur Assembler-Programmierer 69 

1. Catalog, TSL und VTOC 70 

1.1. Catalog 70 

1.2. TSL = Track-Sektor-Liste 71 

1.3. VTOC = Volume Table of Contents 72 

1.4. Track-Sector-Tracer 73 

1.5. DOS-Puffer 77 

2. Fehlermeldungen 78 

2.1. RWTS-Fehlermeldungen 78 

2.2. Applesoft- und DOS-Fehlermeldungen 78 

3. Vermischte Tips, Tricks und Patches 81 

3.1. CAT statt CATALOG? 81 

3.2. CLOSE bei ONERR 82 

3.3. GET bei Execfiles 82 

3.4. CHR$(13) + CHR$(4) 82 

3.5. Zahlenspeicherung 83 

3.6. BSAVE-Sektoreinsparung bei Hires-Bildem 83 

3.7. SAVE ohne Dateiname 83 


Inhalt IX 


3.8. Reset und DOS-Vektoren 83 

3.9. Einseitige Disketten beidseitig bespielen? 84 

3.10. BRUN und EXEC Hello-Programme 84 

3.11. Bank 2: EOOO-Patch 84 

3.12. RUN-Modus bei Maschinenprogrammen 85 

3.13. RUN-Modus bei READ- WRITE nach Programmabbruch 85 

3.14. Mystery Parameter (Zwangs-RUN-Modus, List-Schutz) 86 

3.15. Catalog-Pause 86 

3.16. COUT in Maschinenprogrammen 87 

3.17. INIT-Befehl entfernen 87 

3.18. Booten ohne DOS 87 

3.19. Freie Zero-Page-Speicherstellen 88 

3.20. Versteckte Bildschirm-Speicherstellen 88 

3 .21 . Freie Stellen im DOS $9D00-$BFFF 89 

3.22. Ein- und Ausschalten des Motors 89 

3 .23 . SAVE ohne VERIFY 90 

3.24. BLOAD von iiber 32K langen Files 90 

3.25. Verschieben des Controller-Boot-Programms 90 

3.26. Inverse Dateinamen 90 

3.27. Kopierschutz 91 

3.28. ,,Loch“-Kopierschutzverfahren 91 

3.29. RWTS bei Diversi-DOS usw. schneller? 92 

3.30. Freie Sektoren auf der Diskette 92 

4. GETLN, RDKEY und COUT: Input-Output- Vektoren 94 

4.1. Fusion: Runtime + Tasc.Obj 95 

4.2. CPM-Refiner fur Wordstar-Dateien 97 

4.3. DOS-Output- Vektor-Anderung 100 

5. DOS-Vektoren ab S03D0 103 

6. RWTS (Read-Write-Track-Sector) 105 

6.1. Testprogramme fur RWTS 110 

6.1.1. RWTS-Muster 113 

6.1.2. RWTS-Test mit Warteschleife 116 

6.1.3. RWTS-Test mit Skewing 119 

6.2. Anwendungsprogramme fur RWTS 121 

6.2.1. Diskleser 130 

6.2.2. Schnelles Kopierprogramm 2-Drive-Version 133 

6.2.3. Schnelles Kopierprogramm 1-Drive-Version 141 

6.2.4. DOS-Kopie Track 00-02 150 



X 


Inhalt 


6.2.5. Disk-Comparer 153 

6.2.6. Bad-Sector-Routine 159 

6.2.7. DOS-lose Datendiskette 163 

6.2.8. DOSMOVER-RAMDISK-Driver fur 64K Karte 170 

6.2.9. TSL-Maker 184 

6.2.10. File-Reader 186 

6.2. 1 1 . FASTBRUN- Routine (Apple II Plus Emulator ftir lie) 191 

Anhang 

6502-Befehlstabelle 198 

ASCII-Tabelle 199 

Register 200 


1 


Teil I: DOS fur Anwender und 
Applesoft-Programmierer 

In diesem Teil I werden die Grundlagen des DOS 3.3-Betriebssystems in leichtver- 
standlicher Form ftir Benutzer von Anwenderprogrammen sowie Applesoft- 
Programmierer behandelt. Einige Fakten sind bewufit vereinfacht dargestellt, damit 
der Neuling nicht durch zu viele technische Details abgeschreckt wird. Allerdings 
setzt dieser Teil ab Kapitel 2 Grundkenntnisse von Applesoft voraus, da dieses Buch 
kein Applesoft-Lehrbuch darstellen kann. 
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1. DOS fiir Benutzer von Anwender- 
programmen 

1.1. Betriebssystem 

DOS ist die Abkiirzung fiir Disk Operating System ( = Diskettenbetriebssystem). Ein 
Diskettenbetriebssystem ist ein in der Regel in Maschinensprache geschriebenes Sy- 
stemprogramm, das der Verwaltung von Files (= Dateien) auf der Diskette dient. 
Files konnen Programme, z.B. Basic- oder Maschinenprogramme, Speicherausziige, 
z.B. Grafikbilder, sowie Dateien im engeren Sinne sein, z.B. Brieftexte, Adressen, 
Telefonverzeichnisse usw. 

Fur den Apple II Plus und den neueren Apple lie gibt es verschiedene Diskettenbe- 
triebssysteme, namlich 

a) das Pascal-Betriebssystem 

b) das ProDOS-Betriebssystem 

c) das DOS 3.3-Betriebssystem 

Betriebssysteme sind zumeist mehr oder weniger eng mit Programmiersprachen ver- 
quickt. So eignet sich z.B. das Pascal-Betriebssystem grundsatzlich nur zur Anwen- 
dung in Verbindung mit der Programmiersprache Pascal. ProDOS und DOS 3.3 
sind fur die Programmiersprachen Basic und Assembler (6502 Maschinensprache) 
gedacht. DOS 3.3 kann sowohl unter Applesoft Basic als auch unter Integer Basic 
eingesetzt werden, wahrend ProDOS auf Applesoft Basic beschrankt ist. 


1.1.1. Wann soil ich ProDOS und wann DOS 3.3 einsetzen? 

ProDOS ist fiir externe Massenspeicher, d.h. Diskettenlaufwerke mit groBer Kapazi- 
tat sowie fiir Fest- und Wechselplattenlaufwerke ausgelegt. Damit eignet sich Pro- 
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DOS besonders gut fur die Verwaltung von groBen Datenmassen, z.B. AdreBdateien 
mit 10.000 Adressen usw. Der Preis fur diese groBere, externe Speicherkapazitat ist 
ein urn ca. 12.000 Speicherstellen geringerer interner Speicherraum, weil ProDOS als 
umfangreicheres Betriebssystem entsprechend mehr Platz beansprucht. 

DOS 3.3 eignet sich mehr fiir kleinere externe Datenspeicher, z.B. die klassischen 
Apple-Diskettenlaufwerke mit ca. 143.000 Zeichen externer Speicherkapazitat sowie 
die neueren von Fremdfirmen angebotenen Laufwerke (z.B. Cumara), die eine Spei- 
cherkapazitat von mehr als 300.000 Zeichen haben. 


1.1.2. Ist DOS gleich DOS? 

Im Laufe der Zeit sind von Apple mehrere DOS-Verbesserungen erschienen, nam- 
lich DOS 3, DOS 3.1, DOS 3.2, DOS 3.2.1 und schlieBlich DOS 3.3. In diesem Buch 
befassen wir uns ausschlieBlich mit DOS 3.3, da die vorangehenden Versionen, z.B. 
DOS 3.2 vom 16.2.1979, heute praktisch nicht mehr benutzt werden. 

Aber auch DOS 3.3 ist nicht gleich DOS 3.3, denn im Laufe der Zeit sind von Apple- 
unabhangigen Firmen verschiedene DOS 3.3-Varianten veroffentlicht worden, z.B. 

PRONTO-DOS 
DAVID-DOS 
HYPER-DOS 
SUPER-DOS 
DIVERSI-DOS 
usw. 

Die beste DOS 3.3-Variante ist zweifellos Diversi-DOS, da dieses Betriebssystem bei 
einer Verbesserung der Zugriffsgeschwindigkeit um den Faktor 3-5 bei alien Datei- 
Arten einschlieBlich der sog. Textfiles keine Systemadrefianderungen vornimmt, so 
daB es mit DOS 3.3 vollig kompatibel ist, sofern der Programmierer im Falle eines 
Maschinenprogramms die Standard-Systemadressen benutzt und nicht wahllos im 
DOS ,,herumpokt“. Diversi-DOS ist etwa so schnell wie ProDOS. Die anderen DOS 
3.3-Varianten stellen in der Regel nur maBige Verbesserungen dar, z.B. zumeist aus- 
schlieBlich im Hinblick auf die Geschwindigkeit des Einiadens von sog. Binarfiles 
(Basic-Programme, Maschinenprogramme, Grafik-Bilder). 

Nachfolgend werden wir DOS 3.3 kurz als DOS bezeichnen. Alle Beschreibungen 
der Befehle und technischen Einzelheiten von DOS gelten auch fiir Diversi-DOS. 


Hinweis: 

Wenn in diesem Buch von Diversi-DOS die Rede ist. 
dann ist stets Version 2-C gemeint. Die neueren Versio- 
nen, insbesondere 4-C, sind nicht zu empfehlen. da bei 
diesen die Systemadressen nicht mehr stimmen. 
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1.2. Laufwerk und Controller 

Die klassischen Apple-Laufwerke sind Disk-Drives der Firma Shugart, die als weitge- 
hend wartungsfrei und sehr zuverlassig bezeichnet werden konnen. Die Laufwerke 
sind durch ein Flachbandkabel mit einer sog. Controller-Karte verbunden, die in eine 
der sog. Slots („Schlitze“) Oder Steckplatze der Apple-Platine gesteckt werden kon- 
nen. Bei Apple II Plus konnen die Steckplatze 1-6 benutzt werden, wahrend beim 
Apple lie zusatzlich Slot 7 als moglicher Steckplatz in Frage kommt. Normalerweise 
sollte man die Controller-Karte in Slot 6 stecken, da zahlreiche Programme den Con- 
troller in Slot 6 erwarten. Ein einziger Controller kann mit zwei Laufwerken gleich- 
zeitig verbunden werden, die dann entsprechend als Slot 6, Drive 1 bzw. Slot 6, Drive 
2 angesprochen werden. Insgesamt konnen soviele Doppellaufwerke an den Apple 
angeschlossen werden, wie freie Steckplatze zur Verfiigung stehen. 

Die Apple-Laufwerke lesen eine Diskette stets von unten, d.h. der Lesekopf befindet 
sich sozusagen unterhalb der in das Laufwerk eingeschobenen Diskette. Man beach- 
te, daB aus Griinden der Netzteiliiberlastung zu einem bestimmten Zeitpunkt immer 
nur ein einziges Laufwerk eingeschaltet sein kann (erkenntlich an der rot aufleuch- 
tenden ,,in use“-Lampe). 

Die Pflege der Laufwerke beschrankt sich auf zweierlei: 

1. kann man von Zeit zu Zeit— etwa zweimal pro Jahr— die Lesekopfe mit einer 
sog. Reinigungsdiskette reinigen. Hersteller von Reinigungsdisketten empfehlen eine 
haufigere, teilweise sogar wochentliche Reinigung, doch scheint dies nach meinen 
Erfahrungen bei den Apple-Laufwerken nicht erforderlich zu sein. 

2. kann man von Zeit zu Zeit die Laufwerksgeschwindigkeit neu justieren. Hierzu ist 
erforderlich, daB man das Gehause durch Entfernen der 4 Bodenschrauben abzieht 
und die hinten, unten rechts befindliche kleine Schraube (,,Potentiometer“) nach 
rechts oder nach links dreht, je nachdem, ob die Rotationsgeschwindigkeit zu hoch 
Oder zu niedrig ist. Die im Flandel kauflichen Kopierprogramme enthalten meist eine 
entsprechende , .Speed Adjustment“-Routine, die man zur Geschwindigkeitsregulie- 
rung laufen lassen muB. 

1.3. Diskette 

Disketten sind Datentrager mit direktem Zugriff, d.h. der Lesekopf kann per Pro- 
gramm jeden beliebigen Sektor der Diskette direkt lesen oder beschreiben. Demge- 


1 . DOS fur Benutzer von Anwenderprogrammen 


geniiber muB z.B. eine Datenkassette als Datentrager mit indirektem Zugriff solange 
vorwarts (oder sinngemafl riickwarts) gespult werden, bis der Lesekopf an der ge- 
wtinschten Stelle angelangt ist. 

Disketten konnen einseitig oder beidseitig mit einfacher oder doppelter Schreibdichte 
beschrieben werden. Fur Apple-Laufwerke genugen einseitige Disketten mit einfa- 
cher Schreibdichte. 

Ringverstarkte Disketten sind von Vorteil, doch darf der Ring bei Apple- 
Laufwerken nur ganz flach, d.h. wenig auftragend, sein. Eine optimale Zentrierung 
der Diskette erreicht man dadurch, daB man die Laufwerkklappe exakt in dem Mo- 
ment behutsam schlieBt, in dem das rote ,,in use“-Lampchen aufleuchtet. 

Der Leseschlitz der Diskette, der sich — wie bereits erwahnt — unten befindet, sollte 
niemals mit (fettigen) Fingern in Beruhrung kommen. Ferner sollte man Disketten 
nicht biegen (und erst recht nicht knicken) und nicht auf den Monitor legen (wegen 
der Gefahr des Magnetfeldes). SchlieBlich sollte man Disketten keinen Temperatur- 
schwankungen aussetzen. So kann z.B. das Verschicken von Disketten im Winter die 
Folge haben, daB der sich im Innern der Diskette befindliche Filz klamm wird und 
deshalb die magnetische Kunststoffscheibe ( = die eigentliche Diskette) nicht mehr 
richtig rotiert. 


1.3.1. Reset 

Drucken Sie niemals die Reset-Taste, wahrend ein Laufwerk eingeschaltet ist, denn 
wegen der damit verbundenen Stromzufuhr-Unterbrechnung wird in der Regel der- 
jenige Sektor zerstort, auf dem der Lesekopf gerade ruhte, und zwar stets dann, 
wenn eine Schreiboperation stattfand. Bei Leseoperationen geschieht meistens 
nichts, doch wer weifl schon genau, ob gerade gelesen oder geschrieben wird? Des- 
halb Finger weg von der Reset-Taste, solange das „in-use“-Lampchen an ist! Im au- 
Bersten Notfall Laufwerkklappe offnen, Diskette halb oder ganz herausziehen und 
erst dann Reset drucken! 


1.4. Speicherkapazitat 

Eine Diskette ist in Tracks ( = konzentrische Spuren) und jede Spur ihrerseits in Sek- 
toren eingeteilt. Die DOS-Diskette enthalt 35 Spuren mit je 16 Sektoren. In einem 
einzelnen Sektor kann man 256 Zeichen (oder Bytes) speichern. Auf eine DOS- 
Diskette passen damit 35 mal 16 mal 256 = 143.360 Bytes (oder Zeichen). Eine Dis- 
kette umfaBt insgesamt 35 mal 16 = 560 Sektoren. Ein einzelne Spur enthalt 16 mal 
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256 = 4096 Bytes Oder 4 Kilobytes (1 Kilobyte = 1024 Zeichen), womit eine Diskette 
35 mal 4 = 140 Kilobytes beinhaltet. 

Die 35 Spuren sind von 0 bis 34 (oder hexadezimal von $00-$22) numeriert. Die Sek- 
toren sind von 0-15 (oder hexadezimal von $00-$0F) numeriert. Die Spur 0 ist die au- 
Berste und die Spur 34 die innerste Spur. Zwischen auBerster und innerster Spur be- 
tragt der Abstand nicht einmal 1 cm, so daB die auf der Diskette genutzte Lesezone 
sehr schmal ist. 

Auf den Spuren 0-2 befindet sich normalerweise das Betriebssystem, und auf der 
Spur 17 (hexadezimal $11) befindet sich der sog. Catalog, d.h. das Disketteninhalts- 
verzeichnis. Damit stehen auf einer normalen Diskette nur 35 minus 4 = 31 Spuren 
fur reine Datenspeicherung zur Verfiigung. Die Nettokapazitat betragt damit 31 mal 
4096 = 126.976 Zeichen oder 31 mal 4 = 124 Kilobytes. Es besteht die Moglichkeit, 
DOS-lose Datendisketten zu erstellen, bei denen die Spuren 1 und 2 fur Daten ge- 
nutzt werden konnen, so daB dann die Nettokapazitat 33 mal 4096 = 135.168 Zei- 
chen betragt. 


1.5. Booten 

,, Bootstrap" bedeutet auf englisch eigentlich Stiefelschlaufe und ,,by one's own 
bootstrap" besagt soviel wie, daB man sich wie Mtinchhausen am eigenen Schopfe 
herauszieht. Ein Bootstrap-Programm oder kurz Boot-Programm ist ein sog. Urla- 
der, der in aufeinanderfolgenden Stufen (ahnlich wie beim Raketenstart) das Be- 
triebssystem einladt. Das Boot-Programm befindet sich als nur 256 Bytes langes Pro- 
gramm in der Controller-Karte und wird im Falle von Slot 6 durch folgende Befehle 
aktiviert: 

a) von Applesoft (Cursor l)) aus durch PR #6 (bei Slot 5 PR #5 usw.) 

b) vom Monitor (Cursor *) aus durch 6 Ctrl-P (bei Slot 5 5 Ctrl-P usw.) 

Dies gilt fur den Fall, daB der Apple bereits eingeschaltet war. Das reine Einschalten 
des Apple bewirkt automatisch den Boot-Vorgang (durch ein entsprechendes Moni- 
torprogramm, das bei $FAA6 beginnt und dann nach $C600 im Falle von Slot 6 
springt). Ferner bewirkt beim eingeschalteten Apple lie die Tastenkombination Ctrl- 
Offener Apfel-Reset den Start des Boot-Programms. 

Fleutzutage gibt es kaum noch Apple II Plus Gerate mit weniger als 48K Speicherka- 
pazitat, und Apple He Gerate haben ohnehin stets 64K Speicherkapazitat, so daB so- 
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genannte Master-Disketten, die das DOS in den jeweils hdchstmoglichen Speicherbe- 
reich verschoben hatten, keine Bedeutung mehr haben. 

Nach Beendigung des Boot-Vorgangs befindet sich das DOS in dem Bereich $9600- 
$BFFF (oder dezimal 38400-49151). Der fur Programm und Daten freie Arbeitsspei- 
cher betragt damit ca. 36.000 Zeichen. Die Speicherverteilung sieht genauer gesagt 
folgendermaflen aus (technische Details siehe Teil II dieses Buches): 


1 . 

$0000-$00FF: 

Zero-Page oder Nullseite 

2. 

$0100-$01FF: 

Stack oder Prozessor-Stapel 

3. 

$0200-$02FF: 

Tastatureingabe-Puffer 

4. 

$0300-$03CF: 

frei filr kurze Maschinenprogramme 

5. 

$03D0-$03FF: 

DOS-Vektoren 

6. 

$0400-$07FF: 

Bildschirmspeicher 

7. 

$0800-$95FF: 

frei fiir Programm und Daten 

8. 

$9600-$9CFF: 

3 DOS-Datenpuffer 

9. 

$9D00-$AAC8: 

DOS-Befehlsinterpreter 

10. 

$AAC9-$B5FF: 

DOS File Manager (Entry bei $ AAFD) 

11. 

$B600-$BFFF: 

DOS RWTS (Entry bei $BD00) 


Wenn das DOS in die Language Card ( = die oberen 16K RAM) des Apple lie oder 
Apple II Plus durch einen sog. DOS-Mover geschoben wird, sieht die Speichervertei- 
lung in der Regel so aus: 


1. $0800-$BEFF: 

2. $BF00-$BFFF: 

3. $D000-$DFFF: 

4. $DOOO-$FFFF: 


frei filr Programm und Daten 
DOS-Driver filr Bank-Selecting 
Bank 1 der Language Card frei 
Bank 2 der Language Card DOS 


Die DOS RWTS wiirde dann z.B. bei $F600 beginnen. Der fiir Programm und Da- 
ten freie Speicherraum betragt dann ca. 47.000 Zeichen. 


1.6. Initialisierung (INIT) 


Die Initialisierung— auch Formatierung genannt— bereitet die fabrikneue Leerdis- 
kette zur Datenaufnahme vor, indem softwaremaBig ein bestimmtes Bit-Muster auf 
die Diskette geschrieben wird, damit der Lesekopf spater die einzelnen Spuren und 
Sektoren finden kann (Apple-Disketten sind soft-sektoriert, d.h. softwaremaBig in 
Sektoren eingeteilt. Gegensatz: hard-sektoriert mit z.B. 16 Sektoren-Lochern). 
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Nach dem Booten einer bereits vorliegenden Programmdiskette, z.B. der ,, System 
Master“-Diskette, wird das sog. Hello-Programm geladen. Dies ist dasjenige 
(Applesoft-)Programm, unter dessen Name die Programmdiskette zuvor initialisiert 
wurde. Ein solches Hello-Programm kann z.B. so aussehen: 

10 HOME : PRINT , .DISKETTE ANGELEGT AM 1.3.84“ 

Anwender, die keinerlei Programmiererfahrung haben, verfahren bitte wie folgt: 

1. , .System Master“-Diskette in Laufwerk 1 einlegen 

2. PR #6— gefolgt von der Return-Taste— eingeben 

3. Leerdiskette in Laufwerk 1 einlegen 

4. NEW— in Groflbuchstaben, gefolgt von der Return-Taste— eingeben 

5. 10 HOME : PRINT ..DISKETTE ANGELEGT AM ..." 

— gefolgt von der Return-Taste— eingeben 

6. INIT ZUNAME— gefolgt von der Return-Taste— eingeben 

Damit wird die Leerdiskette unter Ihrem Namen initialisiert und zur Datenaufnahme 
vorbereitet. 

1.7. CATALOG, LOCK, UNLOCK, VERIFY 

Geben Sie jetzt den Befehl CATALOG— gefolgt von Return— ein. Sie sehen dann 
den Catalog oder das Disketteninhaltsverzeichnis (auch Directory genannt), das etwa 
im Falle des Namens Meier folgendermaBen aussieht: 

DISK VOLUME 254 

A 002 MEIER 

„A“ steht fiir Applesoft. ,,002“ steht fur die Anzahl der Sektoren (2), die das 
Applesoft- Programm namens ,,MEIER“ einnimmt. Um die Lange einer Datei tiber- 
schlagig zu berechnen, multiplizieren Sie die Anzahl der Sektoren minus 1 mit 256. 
Hier gilt: (2 minus 1) mal 256 = 256, d.h. die Datei MEIER ist bis zu 256 Zeichen 
lang. 

Tippen Sie nun— stets gefolgt von der Return-Taste— 

LOCK MEIER 
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und dann 
CATALOG 
Sie sehen jetzt 
DISK VOLUME 254 
*A 002 MEIER 

Vor dem ,,A“ steht also jetzt ein Stemchen, was besagt, da!3 die Datei ,,ge-LOCKt“ 
oder schreibgeschiitzt wurde (to lock = zuschlieflen). Mit dem LOCK-Befehl kann 
man also eine Datei vor dem Uberschreiben schiitzen. 

Tippen Sie nun 

UNLOCK MEIER 

und dann 

CATALOG 

Sie sehen dann wieder den ursprtinglichen Catalog, d.h. das Sternchen wurde wieder 
entfernt. Mit dem UNLOCK-Befehl (to unlock = aufschlieBen) laBt sich also der 
Schreibschutz wieder aufheben. 

Der LOCK-Befehl ist nur ein relativer Schutz vor dem Uberschreiben einer Datei, 
denn wenn Sie z.B. jetzt INIT MEIER erneut eingeben wtirden, so wurde die Disket- 
te durch den Formatierungsvorgang vollig iiberschrieben, d.h. man kann auch be- 
reits initialisierte Disketten erneut initialisieren. Wenn sie ganz sicher gehen wollen, 
daB die Daten auf der Diskette nicht mehr verandert werden, dann iiberkleben Sie 
die seitliche Schreibschutzeinkerbung auf der Diskette mit dem in der Disketten-Box 
befindlichen Klebestreifen. Dann kann die Diskette weder iiberschrieben noch durch 
Unachtsamkeit aus Versehen neu initialisiert werden. 

Tippen Sie nun 

VERIFY MEIER 

und danach 
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VERIFY MUELLER 

Im ersteren Fall passiert gar nichts, wahrend Sie im letzteren Fall die Fehlermeldung 
FILE NOT FOUND (= Datei nicht gefunden) erhalten. Der VERIFY-Befehl (to 
verify = iiberpriifen) iiberpriift erstens die Existens einer Datei und zweitens wird 
die Intaktheit der Datei durch vollstandiges Einlesen derselben ermittelt. Es gibt also 
die Moglichkeit, daB zwar der Dateiname aus dem Catalog ersichtlich ist, aber der 
VERIFY-Befehl trotzdem zu einer Fehlermeldung ftihrt (dann meist I/O ERROR), 
was besagt, daB die Datei physisch defekt ist, z.B. wenn Zigarettenasche auf die Dis- 
kette gefallen ist. 

1.8 Kopieren von Disketten und Dateien 

Die ,, System Master“-Diskette enthalt zwei wichtige Kopierprogramme, namlich 

1 . COPYA zum Duplizieren kompletter Disketten, und 

2. FID zum Kopieren einzelner Dateien. 

Beide Programme sind in dem ,,DOS Handbuch“ von Apple ausfuhrlich beschrie- 

ben, so daB hierauf nicht naher eingegangen zu werden braucht. COPYA wird mit 

RUN COPYA 

gestartet, wahrend FID mit 

BRUN FID 

gestartet wird. 

Anstelle von COPYA kann man auch das erheblich schnellere Programm 
COPY.IIE verwenden, dessen Listing im Teil II dieses Buches abgedruckt ist. 
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2.1. Dateinamen 

Wahrend maschinensprachlich die meisten ASCII-Zeichen als Dateinamen moglich 
waren, sollte man normalerweise bei der Wahl der Dateinamen folgende Regeln be- 
achten: 

1 . Ein Dateiname sollte nur aus GroBbuchstaben, Ziffern, Leertaste und Punkt 
bestehen. 

2. Ein Dateiname sollte stets mit einem GroBbuchstaben beginnen. 

3. Ein Dateiname darf hochstens 30 Zeichen lang sein 

Danach ware z.B. ,, + 1 Datei“ ein illegaler Dateiname, weil er mit keinem GroB- 
buchstaben beginnt und auBerdem noch Kleinbuchstaben enthalt. Beispielsweise 
konnte der Applewriter He infolge eines Programmierfehlers keine Dateinamen ein- 
lesen, die den Bindestrich enthalten, z.B. ,,DATEI-1“ (Grund: Der Applewriter ver- 
sucht, den in einen GroBbuchstaben umzuwandeln, was natilrlich nicht geht). 
Wenn man die obigen Regeln beachtet, entstehen niemals Konflikte bei Anwender- 
programmen. 

Auf eine Diskette passen insgesamt 105 Dateinamen und damit theoretisch insgesamt 
105 Dateien. Soviele Dateien konnen jedoch normalerweise niemals auf einer Disket- 
te untergebracht werden, weil sonst jede Datei im Durchscnitt weniger als 5 Sektoren 
einnehmen miiflte, denn eine Diskette enthalt normalerweise nur 496 Daten-Sektoren 
(31 Spuren mal 16 Sektoren). 

2.2. Befehlsnamen 

Ahnlich wie bei Applesoft (z.B. HOME, NEW, PRINT usw.) gibt es bei DOS zahl- 
reiche Befehlsnamen (z.B. CATALOG, LOCK, UNLOCK, VERIFY usw.). Im ein- 
zelnen sind folgende Gemeinsamkeiten und Unterschiede zu beachten: 
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a) Applesoft-Befehlsnamen werden speicherintem als sog. Tokens (= 1-Byte- 
Verschlusselungen) gepackt gespeichert; z.B. ist der interne Code $BA (dezimal 186) 
das Token filr PRINT. Nur wahrend der Eingabe einer neuen Programmzeile Oder 
wahrend des Listens eines Programms erscheinen die Tokens ,,ausgeschrieben“. 
Umgekehrt werden die DOS-Befehlsnamen als Bestandteile eines Applesoft- 
Programms stets „ausgeschrieben“, d.h befinden sich so im Speicher, wie man sie 
beim Listen sieht (als ASCII-Folge mit Bit 7 off). Dafiir konnen DOS-Befehlsnamen 
als String-Variablen deklariert werden, was bei Applesoft-Befehlsnamen nicht mog- 
lich ist. Beispiel: 

10 L$ = ,,LIST“ : REM nicht erlaubt! 

20 C$ = „CATALOG“: REM erlaubt 

b) Genau wie bei Applesoft miissen auch bei DOS die Befehlsnamen in GroBbuch- 
staben geschrieben werden, also List und Catalog falsch, LIST und CATALOG 
richtig. DOS-Befehlsnamen sind 2 - 8 Zeichen lang. 

2.3. Direkte und indirekte DOS-Befehle 

Ahnlich wie bei Applesoft gliedert man bei DOS die Befehle in zwei Gruppen: 


2.3.1. Direkt- UND Indirektbefehle 

Direkt- UND Indirektbefehle lassen sich SOWOHL tiber die Tastatur ALS AUCH 
aus Applesoft-Programmen (sowie Integer- und Assembler-Programmen) heraus ge- 
ben. 

Direktbefehl (Tastatureingabe-Modus, Nicht-RUN-Modus) : 

Der Tastatureingabe-Modus (immediate mode) liegt dann vor, wenn sich das 
,,Prompt“ U (oder beim amerikanischen Apple die eckige Klammer) am linken Bild- 
schirmrand befindet und dahinter der ,,Cursor“ (Schreibmarke) blinkt. 

Der DOS-Direktbefehl unterscheidet sich vom Applesoft-Direktbefehl durch folgen- 
des: 


HOME : PRINT 7 + 3 : LIST 10 
Bei DOS-Befehlen ist dies nicht moglich; z.B. wiirde 
CATALOG : CATALOG 
zu einer Fehlermeldung fiihren. 

— Daruber hinaus konnen DOS-Direktbefehle nur nach einem Return eingegeben 
werden, d.h. der Cursor (U bei Applesoft) mufl sich am linken Bildschirmrand 
befinden. 

Indirektbefehl (Programm-Modus, RUN-Modus): 

Einem DOS-Indirektbefehl muB stets ein Return oder CHR$(13) und ein Ctrl-D oder 
CHR$(4) vorangehen und der Befehl muB in Anftlhrungszeichen gesetzt und als 
PRINT-Befehl ausgefiihrt werden, der mit einem Return endet. 

Richtige Beispiele: 

10 D$ = CHR$(4) : PRINT D$;„CATALOG“ 
oder 

10 D$ = CHR$(4) : PRINT D$„ CATALOG” : REM Semikolon zwischen D$ und 
„CATALOG“ darf fehlen! 

oder 

10 PRINT CHR$(4);„CATALOG“ 
oder 

10 PRINT CHR$(4)„CATALOG“ 
oder 

10 PRINT ,,DCATALOG“ : REM Hier steht das D fur ein eingegebenes Ctrl-D 
oder 


Im Applesoft konnen mehrere Direktbefehle gleichzeitig in einer Zeile eingege- 
ben werden, z.B. 


10 X$ = CHR$(4) + „ CATALOG" : PRINT X$ : REM Variablen-Zuweisung er- 
laubt! 
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Oder 

10 D$ = CHR$(4) : C$ = ,,CATALOG“ : PRINT D$;C$ 

Oder 

10 PRINT CHR$(4) ,, CATALOG" : PRINT CHR$(4) ,, CATALOG" : REM 
Mehrfachbefehle in einer Programmzeile erlaubt! 

Falsche Beispiele: 

10 PRINT „ CATALOG" : REM Ctrl-D fehlt! 
oder 

10 CATALOG : REM PRINT, Ctrl-D und Anfiihrungszeichen fehlen! 
oder 

10 PRINT CHR$(4);„CATALOG“; : REM Semikolon nach CATALOG unter- 
driickt Return! 

Folgende DOS-Befehle konnen sowohl in Direkt- wie Indirektmodus gegeben wer- 
den: 

LOAD 

RUN 

SAVE 

BLOAD 

BRUN 

BSAVE 

CATALOG 

VERIFY 

RENAME 

DELETE 

LOCK 

UNLOCK 

MON 

NOMON 

PR# -t-Slot 


IN # + Slot 

EXEC 

CLOSE 

CFLAIN (nur Integer-Basic!) 

INIT (!) 

MAXFILES (!) 

FP (!) 

INT (!) 

Bei den mit Ausrufezeichen markierten Befehlsnamen ist Vorsicht im Programm- 
Modus geboten. Naheres steht bei den einzelnen Befehlserlauterungen. 

2.3.2. NUR Indirektbefehle 

Reine Indirektbefehle lassen sich nur aus dem Programm heraus geben. Es sind dies 
die Befehle: 

OPEN 

READ 

WRITE 

POSITION 

APPEND 

Es handelt sich hierbei ausschlieBlich um sog. Textfile-Befehle. 


2.4. Parameter Slot, Drive, Volume 

DOS-Befehle konnen durch sog. Parameter naher bestimmt werden. Es sind dies die 
allgemeinen Parameter Slot (S), Drive (D) und Volume (V) sowie einige befehlsspezi- 
fische Parameter wie L(ength) usw., die bei den einzelnen Befehlen behandelt wer- 
den. Die Reihenfolge der Parameter ist gleichgiiltig. Das Betriebssystem merkt sich 
die zuletzt definierten Parameter, so dafl man die Parameter nicht standig wiederho- 
len muB. Beispiele: 

CATALOG, S6,D1 oder 
CATALOG, D1,S6 
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Wie ersichtlich, werden die Parameter vom Befehlsnamen durch Kommas abge- 
grenzt. Aus diesem Grunde darf ein Dateiname niemals ein Komma enthalten! 

1. Slot = S (Steckplatz; Werte 1-7) 

Der Slot-Parameter ist im Bereich 1-7 (beim Apple II Plus wegen einer moglichen 
RGB-Karte in Slot 7 nur im Bereich 1-6) moglich, z.B. 

CATALOG, S4 

2. Drive = D (Laufwerk, Werte 1-2) 

Der Drive-Parameter kann 1 Oder 2 sein, z.B. 

CATALOG, D1 
CATALOG, D2 

3. Volume = V (Disketten-Nummer, Werte 0-254) 

Eine Diskette kann eine Nummer erhalten, die ausschliefilich beim Initialisieren fest- 
gelegt wird und nachtraglich praktisch nicht mehr geandert werden kann (weil die 
Volume-Nummer im sog. AdreBfeld, einem Art Vorspann zu jedem 256-Byte- 
Sektor, beim Formatieren verankert wird.) 

Der zulassige Bereich fur Volume-Nummern ist 1-254, z.B. 

INIT MEIER, VI 
INIT MEIER, V10 

Sonderfall: 

INIT MEIER, VO 

INIT MEIER (ohne Parameter) 

ergibt stets die Volume-Nummer 254. 

Der Nutzen der Volume-Nummer ist gering, da DOS nicht in der Lage ist, automa- 
tisch zu ermitteln, auf welchem Slot und Drive sich eine mit einer Volume-Nummer 
spezifizierte Diskette befindet. (Dies ist z.B. bei Pascal und ProDOS in bezug auf die 
Volume-Names moglich.) 
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Die Volume-Nummer spielt dagegen bei Festplattenlaufwerken (z.B. Corvus) eine 
groBe Rolle, da z.B. die Corvus in 50-100 Volumes eingeteilt ist, je nach GroBe des 
Plattenspeichers. 

Die Parameter S, D und V sind bei fast alien Befehlen moglich. Ausnahmen: 

— bei CATALOG wird der V-Parameter ignoriert 

— bei bestimmten Befehlen sind die Parameter weder sinnvoll noch moglich, z.B. 
MON, NOMON, MAXFILES 

— bei CLOSE sind Parameter nicht erforderlich (und auch nicht zulassig), da die- 
ser Befehl als einziger vollautomatisch alle Dateien auf alien Laufwerken schlie- 
Ben kann. 

— als sehr lastig erweist es sich, daB bei den READ- und WRITE-Befehlen keine 
Parameter zulassig sind (wie man dies umgeht, siehe weiter unten) 

Gesamtaufstellung (in Beispielen): 

INIT,S6,D1,V1 
CATALOG, S5,D2 (kein V) 

RENAME ALT,NEU,S6,D1,V1 
DELETE ALT,S2,D2,V100 
LOCK DATEI,S6,D1,V1 
UNLOCK DATEI,S6,D1,V1 
VERIFY DATEI,S6,D2,V0 

SAVE PROGRAMM,S6,Dl ,V5 

LOAD PROGRAMM , S5 , D2 , VO 

RUN HELLO, S6,D1,V254 

BSAVE BILD,A$4000,L$2000,S6,D1,V1 

BLOAD BILD,S6,D1,V1 

BRUN MASCHINENPROGRAMM,S6,Dl , V 1 

EXEC EXECUTIVE ,FILE,S6,D2,V10 

CHAIN INTEGER.PROGRAMM,S6,Dl,Vl 

MON (kein S,D,V) 

NOMON (kein S,D,V) 

MAXFILES 3 (kein S,D,V) 

FP (normal kein S,D,V) 

INT (normal kein S,D,V) 

PR# 6 (nur S) 

IN #2 (nur S) 
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10 PRINT CHR$(4);,,OPEN DATEI,S6,D1,V1“ 

10 PRINT CHR$(4);, .CLOSE DATEI“ (kein S,D,V) 

10 PRINT CHR$(4);„ WRITE DATEI “ (kein S,D,V) 

10 PRINT CHR$(4);„READ DATE I “ (kein S,D,V) 

10 PRINT CHR$(4); | , APPEND DATEI, S6.D1, VI" 

10 PRINT CHR$(4);„POSITION DATEI* ‘ (kein S,D,V) 


2.5. Einfache DOS-Befehle 

Als einfach bzw. unkompliziert konnen alle diejenigen DOS-Befehle bezeichnet wer- 
den, die nicht mit Textfiles zusammenhangen. 


2.5.1. INIT, CATALOG, LOCK, UNLOCK, VERIFY, DELETE, 
RENAME 

INIT dient — wie bereits geschildert — zum Initialisieren fabrikneuer oder zum Rei- 
nitialisieren bereits fruiter initialisierter ( = formatierter) Disketten: 

10 PRINT „ZU FORMATIERENDE LEERDISKETTE EINLEGEN!** 

20 INPUT ,,WELCHE VOLUME-NUMMER (1-254):“;X$ 

30 PRINT CHR$(4),,INIT DATENDISK**; ,, ,V“;VAL(X$) 

40 PRINT CHRS(4), .DELETE DATENDISK** 

50 GOTO 20 

Dieses kleine Programm wurde jeweils nach der gewiinschten Volume-Nummer fra- 
gen und dann die eingelegte Leerdiskette initialisieren und im AnschluB daran den 
Hello-Namen ( = Boot-Programm-Namen) wieder loschen. Wenn sich auf einer Dis- 
kette kein Hello-Programm mehr befindet, bootet die Diskette trotzdem korrekt, 
doch erfolgt dann die Meldung „FILE NOT FOUND**, weil dieses Programm ja 
jetzt nicht mehr existiert. 

Wie aus diesem Beispiel ersichtlich, ist es zwar moglich, aus einem Programm heraus 
zu initialisieren, doch sollte man unbedingt eine Warnmeldung einbauen, damit 
nicht aus Versehen eine wertvolle Datendiskette durch die Initialisierung zerstort 
wird. 

Die Befehle CATALOG, LOCK, UNLOCK und VERIFY sind bereits bekannt. 
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Auch die Befehle RENAME (Dateiname umbenennen) und DELETE (Datei lo- 
schen) verstehen sich von selbst. Die Syntax ist bei RENAME: 

RENAME ALTER NAME, NEUER NAME 

RENAME ist im DOS nicht narrensicher implementiert mit der Folge, daB es mog- 
lich ist, mit RENAME zwei gleiche Dateinamen auf der Diskette zu erzeugen. Neh- 
men wir an, die Diskette enthalte bereits die Files 

PROGRAMM. 1 
PROGRAMM. 2 

Mit RENAME PROGRAMM. 1 .PROGRAMM. 2 wurde man dann auf der Diskette 
zwei gleiche Dateinamen erzeugen: 

PROGRAMME 
PROGRAMM. 2 

Da die LOAD-, BLOAD-Befehle usw. die Suche nach dem zuerst gefundenen Datei- 
namen abbrechen, wurde man das ehemalige, eigentliche PROGRAMM.2 niemals 
mehr einladen konnen. Man muB dann schleunigst den oberen Dateinamen mit RE- 
NAME PROGRAMM.2, PROGRAMM. 1 wieder zuriickbenennen. 

Demo-Programm : 

100 HOME : INPUT ..DISKETTE EINLEGEN “;X$ 

110 PRINT CHR$(4),,SAVE XXX“ 

120 PRINT CHR$(4), .CATALOG* * 

130 PRINT CHR$(4)„LOCK XXX“ 

140 PRINT CHR$(4)„CATALOG“ 

150 PRINT CHR$(4), .UNLOCK XXX“ 

160 PRINT CHR$(4)„CATALOG XXX“ 

170 PRINT CHR$(4), .RENAME XXX,YYY“ 

180 PRINT CHR$(4)„CATALOG“ 

190 PRINT CHR$(4), .DELETE YYY“ 

200 PRINT CHR$(4)„CATALOG“ 

210 PRINT ,, JETZT KOMMT 'FILE NOT FOUND '-MELDUNG** 

220 PRINT CHR$(4)„ VERIFY YYY“ 

Warum kommt am Ende dieses Programmes eine Fehlermeldung? 
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2.5.2. FP und INT 

FP steht fiir Floating Point Basic (= Flieflkomma-Basic = Applesoft) und INT 
steht fur Integer Basic ( = Ganzzahl-Basic). Der Apple lie sowie der Apple II Plus 
haben Applesoft im ROM (im Bereich $D000-$FFFF), wahrend der Uralt-Apple II 
Integer-Basic im ROM hatte. Die ..System Master“-Diskette ladt automatisch nach 
dem Booten Integer-Basic in die Language Card (RAM-Bereich $D000-$FFFF). Mit 
INT kann man dann zu Integer umschalten, und mit FP wieder zu Applesoft zu- 
rtickschalten. Da Integer-Basic meistens nicht mehr benutzt wird, hat der FP-Befehl 
heute eine andere Bedeutung. Wenn man sich im Applesoft-Modus befindet und FP 
eingibt, dann wird 

1. die Speicherstelle 2048 (hexadezimal $0800) geldscht (Dies macht NEW nicht. 
Ware hier ein anderer Wert auBer 0, dann wiirde RUN nicht mehr funktionieren.) 

2. HIMEM (Highest Memory = Obergrenze des freien Speichers) auf 38400 (hexa- 
dezimal $9600) zurtickgesetzt, womit gleichzeitig MAXFILES 3 eingestellt wird, und 

3. der NEW-Befehl ausgeftihrt. 

FP ist damit wirkungsvoller als NEW allein. FP ist praktisch der einzige Befehl, der 
HIMEM normalisiert. (Falls sich das DOS selbst in der Language Card befindet, be- 
wirkt FP in der Regel HIMEM $BF00.) Der String-Pool von Applesoft beginnt iibri- 
gens bei HIMEM- 1, also bei $95FF. 

FP und INT als Indirektbefehle bewirken den sofortigen Programmabbruch und das 
Loschen des jeweiligen Programms, z.B. 

1000 PRINT CHR$(4)„FP“ 


2.5.3. MAXFILES 

MAXFILES heiBt ,, maximum number of files" = maximale Puffer- und damit Da- 
teianzahl. Fiir jede geoffnete Datei wird ein 595 Bytes umfassender Zwischenpuffer 
angelegt. Die normalerweise 3 automatisch nach dem Booten angelegten Puffer be- 
finden sich in dem Bereich 

$9600-$9CF8 (dezimal 38400-40184); (40184-38400+1) : 595 = 3 

Wenn Befehle wie CATALOG, LOAD, VERIFY usw. ausgefiihrt werden, wird 
vortibergehend 1 Puffer benotigt. Der zuerst belegte Puffer ist der Puffer ab $9600. 
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Nach Beendigung des CATALOG-Befehls usw. wird der Puffer wieder frei. Mit 
dem Befehl MAXFILES + Zahl, z.B. 

MAXFILES 5 

kann man die Anzahl der Puffer festlegen. Es sind maximal 16 Puffer mdglich, wo- 
bei z.B. bei MAXFILES 4 HIMEM um 595 Bytes niedriger gesetzt wird als $9600, 
d.h. je mehr Puffer, desto weniger freier Speicherraum. (Wenn DOS in die Lan- 
guage Card verschoben wurde, hat man in der Regel nur maximal 5 Puffer zur Ver- 
fiigung, die automatisch standig benutzt werden konnen, so daB hier der MAX- 
FILES-Befehl wirkungslos ist.) 

Im einzelnen gilt fiir normales DOS in den unteren 48K: 

MAXFILES 1 = HIMEM: 39590 = $9AA6 
MAXFILES 2 = HIMEM: 38995 = $9853 
MAXFILES 3 = HIMEM: 38400 = $9600 (Normalfall) 

Der momentane Wert von HIMEM laBt sich iibrigens ermitteln mit: 

PRINT PEEK (115) + PEEK (116) • 256 

MAXFILES darf aus einem Programm heraus nur dann geandert werden, wenn zu- 
vor entweder keine Strings definiert wurden oder der Variablen-Speicher mit 
CLEAR geloscht wurde. MAXFILES definiere man deshalb am besten als erste Zei- 
le des Applesoft-Programms, z.B.: 

10 CLEAR : PRINT CHR$(4)„MAXFILES 1“ 

MAXFILES spielt insbesondere bei Textfiles eine Rolle, da fiir jeden durch OPEN 
geoffneten Textfile ein Puffer eingerichtet wird, z.B.: 

10 CLEAR : PRINT CHR$(4)„MAXFILES 4“ 

20 PRINT CHR$(4)„OPEN DATEI. 1“ 

30 PRINT CHR$(4)„OPEN DATEI.2“ 

40 PRINT CHR$(4)„OPEN DATEI.3“ 

50 PRINT CHR$(4)„OPEN DATEI.4“ 

60 PRINT ,,Achtung:“ 

70 PRINT ,,Jetzt kommt Meldung" 

80 PRINT „NO BUFFERS AVAILABLE" 

90 PRINT CHR$(4),,CATALOG“ 
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Da hier nur 4 Puffer angelegt wurden, war kein Puffer mehr fur den CATALOG- 
Befehl zur Verftigung. 


2.5.4. MON und NOMON 

MON kommt von ,,to monitor 1 * = tiberwachen. MON bedeutet DOS-Befehle iiber- 
wachen, NOMON DOS-Befehle nicht mehr iiberwachen. Mit Uberwachen ist ge- 
meint, dafl bei einem laufenden Programm die DOS-Befehle sowie bei Textfiles dar- 
tiber hinaus die eingelesenen Oder gespeicherten Daten am Bildschirm sichtbar wer- 
den. Es gibt folgende spezifische Parameter: 

C = Command = DOS-Befehle werden sichtbar 

I = Input = eingelesene Textfiles werden sichtbar (wahrend des Einlesens) 

O = Output = gespeicherte Textfiles werden sichtbar (wahrend des Speichems) 

Beispiele: 

MON C,I,0 

NOMON C,I,0 (auch NOMONCIO, d.h. Kommas entbehrlich) 

MON C 
NOMON C 
usw. 

Man beachte, daB die Befehle MON und NOMON ohne Parameter wirkungslos 
sind. 


2.5.5. PR #S und IN#S 

Diese Befehle steuern den Output (PR # + Slot) und Input (IN # + Slot) von Peri- 
pheriegeraten. Beispiele: 

— mit PR# 1 wird der Drucker aktiviert, falls in Slot 1 ein Drucker-Interface 
steckt und der Drucker bereits eingeschaltet wurde, d.h. auf ON LINE steht. 

— mit PR# 6 oder auch IN #6 wird das DOS gebootet, falls sich ein DOS- 
Controller in Slot 6 befindet. 

— mit PR # 3 wird die 80-Zeichen-Karte eingeschaltet, falls sich eine solche in Slot 
3 befindet, usw. 

Aus dem Programm heraus sollten diese Befehle steht mit Ctrl-D ausgefuhrt werden, 
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da sonst die sog. DOS-Vektoren und damit das DOS ,,abgehangt“ werden. 

10 PRINT CHR$(4),,PR# 1“ 

wurde den Drucker einschalten und gleichzeitig das DOS angeschlossen lassen. 

10 PR#0 : IN #0 : PR # 1 
wurde den Drucker zwar ebenfalls einschalten, aber das DOS komplett abhangen. 
10 PR#0 : IN #0 : CALL 1002 

wurde dann nach Beendigung des Druckvorgangs das DOS wieder ordnungsgemaB 
,,anhangen“. 

Das planmaBige, vortibergehende ,,Abhangen“ des DOS mit PR#0 : IN#0 und 
das spatere ,,Anhangen“ mit PR#0 : IN#0 : CALL 1002 hat den Vorteil, daB die 
Bildschirm- und Druckergeschwindigkeit wahrend des abgeschalteten DOS grofler 
ist. Weiteres Beispiel: 

10 PR# 0 : IN#0 : REM DOS ABGEHANGT 
20 FOR X = 1 TO 10 
30 PRINT „AAAAAAAAAA“ 

40 NEXT X 
50 PR#1 

60 FOR X = 1 TO 10 

70 PRINT „AAAAAAAAAA“ : NEXT X 

80 PR#0 : IN #0 

90 PRINT CHR$(4) „CATALOG“ : REM WIRKUNGSLOS 
100 PR# 0 : IN#0 : CALL 1002 : PRINT CHR$(4) „CATALOG“ 


2.5.6. LOAD, RUN, SAVE (Basicfiles) 

LOAD, RUN und SAVE sind die DOS-Befehle zum Laden (= LOAD), Laden 
UND Starten (= RUN) sowie zum Speichern (= SAVE) von Applesoft- und 
Integer-Programmen ( = Basicfiles). Die Handhabung dieser Befehle ist denkbar ein- 
fach, da das DOS die Berechnung der Lange des jeweiligen Programms selbst tiber- 
nimmt. Beispiele: 


LOAD HELLO 
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RUN HELLO 
SAVE HELLO 

10 PRINT ,,DIES 1ST PROGRAMME 1 
1000 PRINT CHR$(4) „RUN PROGRAMM.2“ 

Programme lassen sich aus einem Program heraus starten. Allerdings gehen dadurch 
alle Variablen von Programm.l verloren. 

10 PRINT ,,DIES 1ST EIN PROGRAMM, DAS SICH SELBST SPEICHERT“ 
20 PRINT CHR$(4) „SAVE PROGRAMM “ 

Programme lassen sich aus dem Programm heraus selbst speichern, doch ist dies 
normalerweise nicht besonders sinnvoll. 

Basic-Programme werden normalerweise ab 2048 + 1 ( = $0800 + 1) in den RAM- 
Speicher geladen. Start- und Endadresse eines Applesoft-Programms kann man bei 
Bedarf manuell ermitteln durch folgende Formeln: 

Startadresse: PRINT PEEK (103) + PEEK (104) • 256 
Endadresse: PRINT PEEK (175) + PEEK (176) • 256 

Auf der Diskette werden Basic-Programme als Speicherauszuge ab $0801 bis zum 
Programmende inclusive 4 Hex-Codes $00 nach dem Programmende und mit einem 
2 Bytes langen Vorspann, der die Lange beinhaltet (in hexadezimal, Low Byte — 
High Byte), gespeichert. (Nach den 4 Hex $00 wird infolge eines DOS-Fehlers 1 wei- 
teres Byte gespeichert.) 

Basicfiles sind aus dem Catalog wie folgt ersichtlich: 

A steht fur Applesoft 
I steht fur Integer 

Dagegen steht B fur Binarfile und T fur Textfile. 


2.5.7. BLOAD, BRUN und BSAVE (Binarfiles) 

Diese Befehle beziehen sich auf sog. Binarfiles, d.h. auf Maschinenprogramme sowie 
reine Speicherauszuge, z.B. Hires-Bilder, Grafik-Shapes usw. BLOAD steht fiir bi- 
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nares Laden, BRUN fur binares RUN (ausschlieBlich von Maschinenprogrammen) 
und BSAVE steht fiir binares Speichern. 

Der BSAVE-Befehl verlangt als Parameter die Startadresse (A) sowie die Lange (L) 
in entweder dezimaler oder hexadezimaler Schreibweise (auch gemischt mdglich), 
z.B.: 

BSAVE BILD, A$2000, L$2000 oder 
BSAVE BILD, A8192, L8192 oder 
BSAVE BILD, A$2000, L8192 oder 
BSAVE BILD, A8192, L$2000 

Angenommen, im RAM ab $0300 sei Nachstehendes gespeichert: 

0300: 01 02 03 04 05 06 

Wollte man dies auf der Diskette speichern, so wurde folgender Befehl geniigen: 
BSAVE TEST,A$0300,L$0006 oder kiirzer 

BSAVE TEST,A$300,L$6 (Ftihrende Nullen konnen weggelassen werden.) 

Der entsprechende Disketten-Sektor wurde dann so aussehen: 

00 03 06 00 01 02 03 04 05 06 

Die ersten zwei Bytes sind die Startadresse (00 03 — 0300 — $0300 — also zuerst 
Low Byte, dann High Byte) 

Die nachsten zwei Bytes sind die Lange (06 00 — 00 06 — $0006 — wieder Low Byte 
first) 

Fiir vierstellige, hexadezimale Zahlen im Bereich $0000-$FFFF gilt folgende Umrech- 
nungsformel: 

Low Byte + (High Byte • 256) 

Mit BLOAD wird der Binarfile genau an diejenige Stelle eingeladen, die beim voran- 
gehenden BSAVE spezifiziert wurde. Man kann einen Binarfile allerdings auch an ei- 
ne andere Stelle bloaden durch Spezifikation einer neuen Startadresse. Leider gibt es 
beim DOS keinen Befehl, der die Startadresse und Lange eines Binarfiles anzeigt, so 
dafl man mit den folgenden Formeln die Berechnung selbst vornehmen muB: 
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BLOAD-Startadresse: PRINT PEEK (43634) + PEEK (43635) • 256 
BLOAD-Lange: PRINT PEEK (43616) + PEEK (43617)- 256 (vgl. S. 671) 

Wenn das DOS in die Language Card verschoben wurde, wird in der Regel anstelle 
des INIT-Befehls ein entsprechender Befehl implementiert, z.B. PAD bei Diversi- 
DOS. 

Der BRUN-Befehl darf nur bei Maschinenprogrammen angewandt werden. BRUN 
ladt zunachst den Binarfile und springt dann zur Startadresse. 

Die Lange eines Binarfiles darf 32767 ( = $7FFF) normalerweise nicht ilberschreiten. 
Die Startadresse kann im Bereich 0-65535 ($0000-$FFFF) liegen. 

Als freie Bereiche fur Binarfiles kommen in Frage: 

$0200-$02FF (nur filr vorubergehend benotigte Startprogramme, da dies der Tasta- 
tureingabepuffer ist) 

$0300-$03CF 

$0803-$095FF (Maschinenprogramme sollte man besser ab $803 statt $800 beginnen 
lassen, da Applesoft dann ,,denkt“, daB kein Programm geladen wurde.) 

Wenn sich DOS in der Language Card befindet, kann man auch noch den Bereich 
$9600-$BEFF benutzen. Umgekehrt, wenn sich DOS nicht in der Language Card be- 
findet, stehen die oberen 16K des RAM-Speichers ebenfalls filr Maschinenprogram- 
me zur Verfugung. 

Zusammenfassend gilt filr Applesoft-, Integer- und Binar-Files folgender 
,,Vorspann“ auf dem ersten Datensektor des Files auf der Diskette: 

1. Integer: Low Byte + High Byte der Lange, 

danach Programm, 
danach 4 Hex-Codes 00 

2. Applesoft: Low Byte + High Byte der Lange, 

danach Programm, 
danach 4 Hex-Codes 00 

3. Binarfile: Low Byte + High Byte der Startadresse, 

Low Byte + High Byte der Lange, 
danach eigentlicher Binarfile 
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2.5.8. CHAIN 

Der CHAIN-Befehl sei hier nur der Vollstandigkeit halber erwahnt. Er gilt nur filr 
das kaum noch benutzte Integer-Basic und dient dem Zweck, aus einem Integer- 
Programm heraus ein weiteres Integer-Programm mit RUN zu starten, ohne daB da- 
durch die Variablen zerstort werden, z.B.: 

1000 PRINT ,,D CHAIN ZWEITPROGRAMM“ : REM D = CTRL-D 

Fiir Applesoft befindet sich auf der ,, System Master“-Diskette eine ahnliche 
Maschinen-Routine, die jedoch nicht immer funktioniert. Auch bei Applesoft- 
Compilern wie TASC usw. funktioniert das ,,Chaining“ nur teilweise. Fiir Besitzer 
von RAM-Karten, z.B. der Apple lie 64K Karte, gibt es eine viel sicherere Losung. 
Man speichert die Variablen auf der schnellen RAM-Disk, startet das nachste 
Programm-Modul und ladt schlieBlich die zwischengespeicherten Variablen von der 
RAM-Karte wieder zuriick. Ein RAM-Disk-Driver ist im Teil II dieses Buches als Li- 
sting abgedruckt. 


2.6. Textfile-Befehle 

2.6.1. OPEN, READ, WRITE, CLOSE 

Informationstheoretisch gesehen gibt es zwei grundsatzlich verschiedene Arten von 
Dateien, namlich 

1. Programm-Dateien, z.B. Applesoft-, Integer- und Assemblerprogramme, so- 
wie 

2. Daten-Dateien, z.B. Adressen, Briefe, Bilder, MeBwerte usw. 

Basicfiles (A, I) sind stets Programm-Dateien. Binarfiles sind demgegentiber teils 
Programm-Dateien (z.B. Assemblerprogramme) und teils Daten-Dateien, z.B. 
Hires-Bilder, binar abgespeicherte Zahlen-Arrays usw. 

Die typische und zugleich wichtigste Daten-Datei fiir sowohl Applesoft- wie auch 
Maschinen-Programme ist der sog. Textfile. Textfile bedeutet wortlich Text-Datei 
(String-Datei, Zeichenketten-Datei), doch konnen Textfiles auch Zahlen-Dateien 
beinhalten. 
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Beispiel: Strings 

AAAAA 

BBBBB 

10 PRINT CHR$(4) „OPEN STRINGS" 

20 PRINT CHR$(4) „ WRITE STRINGS" 

30 PRINT „ AAAAA" 

40 PRINT ,, BBBBB" 

50 PRINT CHR$(4) „CLOSE“ 

10 PRINT CHR$(4) „OPEN STRINGS" 

20 PRINT CHR$(4) „READ STRINGS" 

30 INPUT A$ 

40 INPUT B$ 

50 PRINT CHR$(4) „CLOSE“ 

Beispiel: Zahlen 

11111 

22222 

10 PRINT CHR$(4) „OPEN ZAHLEN" 

20 PRINT CHR$(4) „ WRITE ZAHLEN" 

30 PRINT 11111 
40 PRINT 22222 
50 PRINT CHR$(4) „CLOSE“ 

10 PRINT CHR$(4) „OPEN ZAHLEN" 

20 PRINT CHR$(4) ,,READ ZAHLEN" 

30 INPUT Z1 
40 INPUT Z2 

50 PRINT CHR$(4) „CLOSE“ 

Aus den Beispielen konnen wir folgendes ersehen: 

1 . Ein Textfile, gleichviel ob er neu angelegt wird Oder bereits existiert, d.h. bereits 
fruher angelegt wurde, wird mit OPEN + DATEINAME geoffnet. Wenn eine 
Datei bereits angelegt war und nunmehr durch neue Werte iiberschrieben wer- 
den soil, so empfiehlt es sich, falls der neue Datei-Inhalt kleiner als der alte 


wird, die Altdatei zunachst zu loschen, da sonst die Neudatei auf der Diskette 
den gleichen Raum einnehmen wird wie die Altdatei. Beispiel: 

10 REM ALTDATEI MIT 1000 STRINGS 
20 PRINT CHR$(4) „OPEN TEST" 

30 PRINT CHR$(4) „ WRITE TEST" 

40 FOR X = 1 TO 1000 : PRINT „ AAAAA" : NEXT X 
50 PRINT CHR$(4) „CLOSE“ 

10 REM NEUDATEI MIT 500 STRINGS 
20 PRINT CHR$(4) „OPEN TEST" 

30 PRINT CHR$(4) , .DELETE TEST" 

40 PRINT CHR$(4) „OPEN TEST" 

50 PRINT CHR$(4) „ WRITE TEST" 

60 FOR X = 1 TO 500 : PRINT „ AAAAA" : NEXT X 
70 PRINT CHR$(4) „CLOSE“ 

Bemerkungen: 

a) Die Zeile 20 bei dem Neudatei-Programm kann entfallen, falls man sicher ist, 
daB sich auf der Diskette bereits eine Datei dieses Namens befindet. Ist man 
sich jedoch unsicher, ob die TEST-Datei bereits existiert, dann kann man mit 
OPEN - DELETE - OPEN die „FILE NOT FOUND“-Fehlermeldung um- 
gehen. 

b) Hatte man die Neudatei nicht zunachst geloscht, dann wiirde die Neudatei wei- 
terhin auf der Diskette denselben Raum wie die Altdatei einnehmen, weil DOS 
nach dem CLOSE die nunmehr iiberfltissigen, restlichen Altdatei- 
Datensektoren nicht von selbst loscht. 

2. Nach dem OPEN-Befehl kann wahlweise ein WRITE- oder READ-Befehl fol- 
gen, je nachdem, ob auf die Datei geschrieben oder von ihr gelesen werden soil. 

3. Eine Datei wird normalerweise mit PRINT-Befehlen beschrieben und mit 
INPUT-Befehlen gelesen. 

4. Eine Datei muB mit dem CLOSE-Befehl stets geschlossen werden, auch dann, 
wenn nur von ihr gelesen wurde. Zwar gehen bei Dateien, aus denen nur gele- 
sen wird, keine Daten auf der Diskette verloren, wenn der CLOSE-Befehl ver- 
gessen wurde, doch bleibt dann der fiir diese Datei bereitgestellte DOS-Puffer 
belegt. Offnet man z.B. bei Maxfiles 3 den vierten Textfile, ohne zuvor eine der 
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ersten drei geoffneten Textfiles wieder zu schlieBen, folgt die Meldung ,,NO 
BUFFERS AVAILABLE" ( = keine Puffer mehr frei). Ein fehlender CLOSE- 
Befehl kann auch nach Beendigung des Programms manuell nachgeholt wer- 
den, indem man iiber die Tastatur CLOSE tippt. CLOSE allein schlieBt ALLE 
noch offenen Dateien, CLOSE + DATEINAME schlieBt nur diese letztere 
Datei. Beispiel: 

10 PRINT CHR$(4) „OPEN DATEI. 1“ 

15 PRINT 1 

20 PRINT CHR$(4) „OPEN DATEI. 2“ 

25 PRINT 2 

30 PRINT CHR$(4) „OPEN DATE 1.3“ 

35 PRINT 3 

40 PRINT CHR$(4) ,, CLOSE DATEI. 1“ : REM SchlieBt nur diese Datei.l 

Was aus den Beispielen nicht unmittelbar evident, jedoch fur die Korrektheit der 
Textfile-Befehle erforderlich ist, ist der Umstand, dafl die OPEN-, READ- und 
WRITE-Befehle nur dann wirksam werden, wenn ihnen nicht nur ein Ctrl-D, son- 
dern auch ein Ctrl-M bzw. Return vorausgeht. 

Falsches Beispiel 1 : 

10 PRINT CHR$(4) „OPEN TEST" 

20 PRINT CHRS(4) „WRITE TEST" 

30 PRINT ,,AAAAA“; : REM Semikolon! 

40 PRINT CHR$(4) ,, CLOSE" 

Kommentar: Der letzte PRINT-Befehl vor dem CLOSE-Befehl darf nicht mit einem 
Semikolon abschlieBen, da sonst der CLOSE-Befehl nicht ausgefiihrt wird. Beim 
Beispiel 1 wiirde auf die Diskette statt ,,AAAAA“ in Wirklichkeit ..AAAAA- 
CLOSE" geschrieben, d.h. Ctrl-D + ,, CLOSE" wiirde an den String ,,AAAAA“ 
angehangt werden! 


Richtiges Beispiel 1: 

10 PRINT CHR$(4) „OPEN TEST" 

20 PRINT CHRS(4) „WRITE TEST" 

30 FOR X = 1 TO 3 : PRINT ,,AAAAA“; : NEXT X 
40 PRINT : PRINT CHR$(4) „CLOSE“ 
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Kommentar: Mehrere PRINT-Befehle mit Semikolon zur Unterdriickung des Re- 
turns sind zulassig, doch muB der letzte PRINT-Befehl ein Return beinhalten. 

Falsches Beispiel 2: 

10 PRINT „SPEICHERN J/N GET X$ 

20 IF X$ = „N“ THEN END 
30 PRINT CHR$(4) „OPEN TEST" 
usw. 

Kommentar: Der GET-Befehl unterdruckt das Return mit der Folge, dafl ,,OPEN 
TEST" am Bildschirm angezeigt, aber nicht vom DOS als Befehl erkannt wird. 

Richtiges Beispiel 2: 

10 PRINT „SPEICHERN J/N : GET X$ 

20 IF X$ = „N“ THEN END 

30 PRINT : PRINT CHR$(4) „OPEN TEST" 

Kommentar: Hier steht in Zeile 30 ein zusatzliches PRINT, so daB der DOS-Syntax 
Gentige getan wird. 


2.6.2. Struktur eines Textfiles 

Wenn auf die Diskette folgende Datei geschrieben wird 

10 PRINT CHR$(4) „OPEN FILE" 

20 PRINT CHR$(4) „ WRITE FILE" 

30 PRINT „aaaaa“ 

40 PRINT „bbbbb“ 

50 PRINT ,,ccccc“ 

60 PRINT CHR$(4) ..CLOSE" 

dann hat diese Datei die Struktur: 

aaaaa + Return Feld 1 

bbbbb + Return Feld 2 

ccccc + Return Feld 3 

+ Ctrl-0 Endmarker 
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Durch Return abgegrenzte ASCII-Folgen (Strings Oder Zahlen) werden als Felder be- 
zeichnet. 

Return hat den ASCIl-Code 13 Oder 141 (hexadezimal SOD oder $8D) und Ctrl-0 hat 
den ASCII-Code 0 Oder 128 (oder hexadezimal $00 oder $80). ASCII ist die Abkiir- 
zung fur American Standard Code for Information Interchange, d.h. amerikani- 
scher Datenaustausch-Code. Die Tabelle im Anhang zu diesem Buch enthalt ei- 
ne erweiterte ASCII-Code-Aufstellung mit den entsprechenden hexadezimalen, bi- 
naren und dezimalen Code-Werten. Bereits ein fliichtiger Blick auf diese Tabelle ge- 
nugt um festzustellen, da(3 die Tabelle sozusagen doppelt belegt ist, d.h. die Werte 
von 0-127 werden durch die Werte von 128-255 wiederholt. Bei der ersten Halfte ist 
das linke Bit der 8-Bit-Binarverschlusselung stets 0, bei der zweiten Halfte stets 1 . 
Dieses linke Bit wird Bit 7 genannt, da die Bits von rechts nach links — beginnend 
mit 0 — gezahlt werden. Beispiel: 

76543210 = Bit-Positionen 
11110000 = $F0 = p 

Insgesamt gibt es also 2 mal 128 verschiedene Zeichen bzw. Codes. Wahrend Apple- 
soft im RAM-Speicher Strings in der Regel mit ,,Bit 7 off" (Bit 7 = 0; linke Halfte) 
speichert, werden Strings auf der Diskette in der Regel mit ,,Bit 7 on" (Bit 7 = 1; 
rechte Halfte) gespeichert. Return hat damit den Wert 141 (oder $8D). Dagegen wird 
als Ausnahme Ctrl-0 auf der Diskette stets als 0 (oder $00 oder 00000000) gespei- 
chert. Ctrl-0 (auch NUL genannt) ist der Endmarker ( = die Endmarke = die End- 
markierung) fur einen Textfile. Symbolisch wiirde die obengenannte Datei auf der 
Diskette also wie folgt gespeichert: 

aaaaaRbbbbbRcccccRO 

R = Return = Ctrl-M 
0 = Ctrl-0 = NUL 

Und hexadezimal verschlusselt wiirde die Datei so aussehen: 

El El El El El 8D E2 E2 E2 E2 E2 8D E3 E3 E3 E3 E3 8D 00 

(Die Leertasten sind in beiden Fallen nur aus Grtinden der besseren Lesbarkeit einge- 
fiigt.) 

Bei der ASCII-Tabelle sind die Werte 160-254 (oder $A0-$FE) die sogenannten sicht- 
baren oder druckbaren Zeichen: 
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$A0-$AF: diverse Sonderzeichen 

$B0-$B9: Ziffern 

$BA-$C0: diverse Sonderzeichen 

$C0-$DA: groBes Alphabet 

$DB-$E0: landerspezifische Zeichen (Umlaute) 

$E1-$FA: kleines Alphabet 

$FB-$FE: landerspezifische Zeichen (Umlaute) 

Daneben gibt es noch die Ctrl-Zeichen = Kontroll-Zeichen = Steuerzeichen = nor- 
malerweise nicht sichtbare und keinesfalls druckbare Zeichen: 

$80-$9F : diverse Kontroll-Zeichen 

$FF: DEL-Zeichen (Rtickwarts-Loschzeichen) 

ferner 

$00: Endmarker fiir Text files 

Von den Kontroll- oder Steuerzeichen haben zwei fiir DOS eine besondere Bedeu- 
tung: 

1 . Ctrl-D = $84 = DOS-Befehlserkennungszeichen 

2. Ctrl-M = $8D= Feldbegrenzungszeichen 

Ctrl-D und Ctrl-M sollten moglichst niemals Bestandteil eines Strings sein, da dies 
sonst zu Schwierigkeiten bei Applesoft-Programmen fiihrt. 

Zahlen = Strings auf der Diskette? 

Textfiles konnen sowohl Zahlen wie Strings enthalten. Zahlen werden jedoch auf der 
Diskette genauso wie Strings gespeichert, d.h. genau in der Form, wie man Zahlen 
am Bildschirm sieht und nicht etwa in binar verschlusselter Form, wie sie Applesoft 
speicherintem abgelegt (in sog. gepackter 5-Byte-Verschlusselung bei FlieBkomma- 
zahlen und gepackter 2-Byte- Verschliisselung bei Ganzzahlen). Beispiel: 

10 PRINT CHR$(4) „OPEN TEST" 

20 PRINT CHR$(4) „ WRITE TEST" 

30 PRINT ,,12345“ : REM DIES IST EIN STRING! 

40 PRINT CHR$(4) „CLOSE“ 

50 PRINT CHR$(4) „OPEN TEST" 
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60 PRINT CHR$(4) ,,READ TEST" 

70 INPUT Z 

80 PRINT CHR$(4) „CLOSE“ 

Hier wird ,,12345“ als String gespeichert und als Zahl durch INPUT Z eingelesen. 

10 PRINT CHR$(4) „OPEN TEST" 

20 PRINT CHR$(4) ,, WRITE TEST" 

30 PRINT 12345 : REM DIES 1ST EINE ZAHL! 

40 PRINT CHR$(4) „CLOSE“ 

50 PRINT CHR$(4) „OPEN TEST" 

60 PRINT CHR$(4) ,,READ TEST" 

70 INPUT S$ 

80 PRINT CHR$(4) ,, CLOSE" 

Hier wird 12345 als Zahl gespeichert und als String durch INPUT S$ eingelesen. 

Diese beiden Beispiele machen deutlich, daB man als Strings gespeicherte Zahlen als 
Zahlen-Variablen einlesen kann und umgekehrt. Voraussetzung ist nattirlich, daB die 
Strings nur Zahlzeichen enthalten, also die Ziffern von 0-9 sowie Dezimalpunkt, 
Plus- oder Minuszeichen sowie E ( = Exponent-Zeichen). 


2.6.3. Komma und Semikolon: PRINT und INPUT 

An die WRITE- und READ-Befehle schliefien sich tiblicherweise die entsprechenden 
PRINT- und INPUT-Befehle an. Um mit Textfiles effektiv umgehen zu konnen, 
muB man sich zunachst einmal mit den PRINT- und INPUT-Befehlen, die eigentlich 
Applesoft-Befehle sind, vertraut machen. 

PRINT + Zahl oder PRINT + String, z.B. 

PRINT A : PRINT A$ oder 
PRINT 1 : PRINT ,,AAAAA“ 

bewirken normalerweise die Bildschirmanzeige der Zahlen bzw. Strings. Ist ein 
Drucker angeschlossen (mit PR#1), werden die PRINT-Werte gleichzeitig an den 
Drucker geschickt. Ist jedoch eine DOS-Datei geoffnet, dann bewirken die PRINT- 
Befehle das Speichern der Werte auf der Diskette. 

Nach der Basic-Syntax lassen sich 3 PRINT-Arten unterscheiden: 

1. PRINT + Return, z.B. PRINT A 
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2. PRINT + Semikolon, z.B. PRINT A; 

3 . PRINT + Komma, z.B. PRINT A, 

Das Semikolon am Ende eines PRINT-Statements unterdriickt das Return und das 
Komma am Ende eines PRINT-Statements bewirkt eine Tabulierung am Bildschirm. 

Der INPUT-Befehl ist normalerweise fur die manuelle Tastatureingabe aus einem 
Applesoft-Programm heraus gedacht. Ist jedoch eine DOS-Datei geoffnet, dann be- 
wirkt der INPUT-Statement das Einlesen eines Strings oder einer Zahl von der Dis- 
kette und die Zuweisung zu der spezifizierten Variablen. Wahrend PRINT statt Va- 
riablen auch Konstanten als Parameter haben kann, z.B. 

PRINT 1 statt PRINT A, wobei A = 1 oder 
PRINT ,,AAA“ statt PRINT A$, wobei A$ = ,,AAA“ 

muB INPUT als Parameter stets eine Variable haben, also 

INPUT A oder INPUT A$ 

Nach der Basic-Syntax lassen sich 2 INPUT-Arten unterscheiden: 

1. INPUT + Return, z.B. INPUT A : INPUT B : INPUT C 

2. INPUT + Komma, z.B. INPUT A, B, C 

Fur den ersten Fall gibt es bei Applesoft-Programmen entweder die Moglichkeit, daB 
mehrere INPUT-Statements — getrennt durch Doppelpunkt — in derselben Pro- 
grammzeile stehen 

10 INPUT A : INPUT B : INPUT C 

oder daB die INPUT-Statements auf mehrere Programmzeilen verteilt werden 

10 INPUT A 
20 INPUT B 
30 INPUT C 

Im zweiten Fall mitssen die Variablen alle in einer einzigen Zeile stehen und durch 
Return bei der letzten Variablen abgeschlossen werden: 

10 INPUT A, B, C 
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2.6.4. Komma bei Mehrfachfeldern 

Da PRINT-Befehle mit Kommas eigentlich eine Tabulierung bewirken, die natiirlich 
auf der Diskette nichts zu suchen hat, sollte man die READ- und WRITE-Befehle 
nach meinen Erfahrungen am besten gar nicht mit Kommas implementieren, da 
man sonst wunderliche Uberraschungen erleben kann. 

Falsches Beispiel 1: 

10 PRINT CHR$(4) „OPEN TEST" 

20 PRINT CHR$(4) „WRITE TEST" 

30 PRINT 1, 2, 3 

40 PRINT CHR$(4) „CLOSE“ 

50 PRINT CHR$(4) „OPEN TEST“ 

60 PRINT CHR$(4) „READ TEST“ 

70 INPUT A, B, C 
80 PRINT CHR$(4) „CLOSE“ 

Kommentar: Auf der Diskette entsteht eine Datei mit der Struktur 
123R 

d.h. die Ziffern sind nicht durch Kommas voneinander abgetrennt, so daB insgesamt 
nur eine einzige Zahl 123 auf der Diskette gespeichert wird mit der Folge, daB bei 
Einlesen nach der Variablen A fur B und C keine Werte mehr zur Verfiigung stehen. 

Falsches Beispiel 2: 

10 PRINT CHR$(4) „OPEN TEST“ 

20 PRINT CHRS(4) „ WRITE TEST" 

30 PRINT 1 2 3 

40 PRINT CHR$(4) „CLOSE“ 

50 PRINT CHR$(4) „OPEN TEST“ 

60 PRINT CHR$(4) ,,READ TEST" 

70 INPUT A : INPUT B : INPUT C 
80 PRINT CHR$(4) „ CLOSE" 

Kommentar: Auf der Diskette entsteht eine Datei mit der Struktur 


1,2,3R 
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d.h. die Ziffern sind durch Kommas getrennt. Da jedoch der nackte INPUT- 
Statement (ohne folgendes Komma) ein Return und kein Komma erwartet, bewirkt 
Beispiel 2 ebenso wie Beispiel 1 eine DOS-Fehlermeldung. 

Richtiges Beispiel 3a: 

10 PRINT CHR$(4) „OPEN TEST" 

20 PRINT CHR$(4) „ WRITE TEST" 

30 PRINT 1 2 3 

40 PRINT CHR$(4) „CLOSE“ 

50 PRINT CHR$(4) „OPEN TEST" 

60 PRINT CHR$(4) „READ TEST" 

70 INPUT A, B, C 
80 PRINT CHR$(4) „CLOSE“ 

Richtiges Beispiel 3b: 

10 A = 1 : B = 2 : C = 3 
20 PRINT CHR$(4) „OPEN TEST" 

30 PRINT CHR$(4) „ WRITE TEST" 

40 PRINT A B C 
50 PRINT CHR$(4) „ CLOSE" 

60 PRINT CHR$(4) „OPEN TEST" 

70 PRINT CHR$(4) „READ TEST" 

80 INPUT A, B, C 
90 PRINT CHR$(4) „CLOSE“ 

Kommentar: Bei den Beispielen 3a und 3b entstehen wie bei dem Beispiel 2 auf der 
Diskette Files mit der Struktur 

1,2,3R 

Die in Anfuhrungszeichen gesetzen Kommas bewirken, daB diese Kommas auch auf 
der Diskette mitgespeichert werden (im Gegensatz zum Beispiel 1 , wo die Kommas 
nicht in Anfuhrungszeichen gesetzt wurden). Liest man nun diese Datei mit Komma- 
INPUT-Statements ein, erfolgt eine korrekte Wertzuweisung zu den Variablen A, B 
und C. Es ist also moglich, mit Kommas zu arbeiten, doch ist das folgende Pro- 
gramm erheblich narrensichere, zumal dann eine einheitliche File-Struktur „Feld + 
Return" stets gewahrleistet wird: 
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10 PRINT CHR$(4) „OPEN TEST“ 

20 PRINT CHR$(4) „ WRITE TEST“ 

30 PRINT 1 : PRINT 2 : PRINT 3 
40 PRINT CHR$(4) „CLOSE“ 

50 PRINT CHR$(4) „OPEN TEST“ 

60 PRINT CHR$(4) „READ TEST" 

70 INPUT A : INPUT B : INPUT C 
80 PRINT CHR$(4) „CLOSE“ 

Dieses Beispiel erscheint auf den ersten Blick umstandlicher als die obigen Beispiele. 
Man muB jedoch beriicksichtigen, das das Speichern und Einlesen von Textfiles iibli- 
cherweise nicht einer Anhaufung von Einzelvariablen darstellt, z.B.: 

10 INPUT A1 : INPUT A2 : INPUT A3 : INPUT A4 : INPUT A5 : REM usw. 

denn dies ware bei einer groBen Anzahl von Variablen vollig unokonomisch. Viel- 
mehr werden Textfiles sinnvollerweise als Arrays gespeichert bzw. eingelesen, z.B.: 

10 DIM A(1000) 

20 PRINT CHR$(4) „OPEN DATEI“ 

30 PRINT CHR$(4) ,,READ DATEI“ 

40 FOR X = 1 TO 1000 : INPUT A(X) : NEXT X 
50 PRINT CHR$(4) „CLOSE“ 

Auf diese Weise lassen sich mit wenigen Programmzeilen Tausende von Zahlen oder 
Strings einlesen. 

2.6.5. Semikolon: GET und PRINT CHR$(X) 

Semikolons (oder Semikola) bewirken beim PRINT-Befehl die Unterdriickung des 
Returns sowohl bei der Bildschirmanzeige und Druckerausgabe wie auch bei der 
Speicherung von Textfiles auf der Diskette. In Applesoft ist es praktisch nicht mog- 
lich und auch nicht sinnvoll, Textfiles anzulegen, die keinerlei Returns enthalten. Da 
vor dem CLOSE-Befehl stets ein Return stehen muB, muB ein mit Applesoft erstell- 
ter Textfile zwangsweise ein Return enthalten, z.B. 

10 PRINT CHR$(4) „OPEN TEST" 

20 PRINT CHR$(4) „ WRITE TEST" 

30 FOR X = 1 TO 10000 : PRINT ,,AAAAAAAAAA“; : NEXT 
40 PRINT : PRINT CHR$(4) ,, CLOSE‘S 
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Diese TEST-Datei wilrde aus 10 mal 10000 = 100.000 A 's + einem einzigen Return 
am File-Ende bestehen. Eine solche fast Return-lose Datei konnte man jedoch mit 
INPUT-Statements nicht mehr einlesen, da der INPUT-String maximal 239 Zeichen 
lang sein darf. Mit anderen Worten: Applesoft-Programmierer konnen grundsatz- 
lich nur Textfiles bewaltigen, die in Felder eingeteilt sind, wobei die praktikable Feld- 
lange in der Regel ca. 230 Zeichen inkl. Return nicht tiberschreiten sollte. 

Ein String als solcher darf bis zu 255 Zeichen lang sein, doch kann ein solcher String 
nicht mit INPUT eingegeben werden wegen der Obergrenze von 239 Zeichen. Die 
Definition eines Strings in einer Programmzeile ist sogar auf ca. 230 Zeichen be- 
grenzt, je nachdem, ob die Zeilennummer ein- oder mehrstellig ist: 

100 A$ = „ 123456789012345678901234567890123456789012345678901234567890123 
456789012345678901234567890123456789012345678901234567890123456789012345 
678901234567890123456789012345678901234567890123456789012345678901234567 
89012345678901234567890“ ‘ 

Ein einzelner String mit bis 255 Zeichen kann also nur durch Verkettung entstehen: 
10 A$ = B$ + C$ 

Dateien, die keine (oder fast keine) Returns enthalten, lassen sich von einem 
Applesoft-Programm mit GET-Befehlen einlesen. Bei Dateien der obigen GroBen- 
ordnung ist jedoch der GET-Statement vollig undiskutabel, das es eine schiere Ewig- 
keit dauern wilrde, bis diese Datei eingelesen ware. Probieren Sie es selber einmal 
aus! 

10 PRINT CHR$(4) „OPEN TEST" 

20 PRINT CHR$(4) ,,READ TEST" 

30 FOR X = 1 TO 10000 
40 FOR Y = 1 TO 10 
50 GET X$ 

60 NEXT Y,Z 

70 PRINT : PRINT CHR$(4) „CLOSE“ 


Wie lange hat es gedauert? 

Ubrigens gibt es kein exaktes Gegenstiick zum GET-Befehl, denn wahrend der Get- 
Befehl tatsachlich nur zum Einlesen von je einem einzelnen Zeichen von der Diskette 
verwendet werden kann, eignet sich der PRINT-Befehl sowohl zum Speichern einzel- 
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ner Zeichen als auch langerer Zeichenketten (= Strings). Bisweilen ist es erforder- 
lich, dab eine Folge einzelner Zeichen als ASCII-Code in Form von 

PRINT CHR$(X); 

auf die Diskette gesendet werden mussen, z.B. wenn Binarfiles in Textfiles umge- 
wandelt werden mussen. Ein Beispiel ist hierfiir die Umwandlung von Applewriter 
1.1 -Binarfiles in normale Textfiles, was an dem nachfolgenden Programm demon- 
striert werden soil: 


2.6.5. 1. Applewriter 1.1 Binarfde-Konverter 

100 REM = = = APPLEWRITER 1.1: BINAR- IN TEXT-FILE = = = 

110 HOME : HTAB 14: VTAB 3: INVERSE : PRINT , , APPLEWRITER 1.1“ 
120 HTAB 1: VTAB 7: PRINT „UMWANDLUNG VON B-FILES IN T-FILES“: 
NORMAL 

130 PRINT : PRINT : PRINT „ START J/N 
140 GET X$: IF X$ = „N“ THEN HOME : END 
150 IF X$ < > „J“ THEN 140 

160 PRINT : PRINT : PRINT , ,LAUFWERK-NR. (1 ODER 2): 

170 GET X$: IF X$ < > „1“ AND X$ < > „2“ GOTO 170 
180 D = VAL (X$) 

190 HOME : PRINT : PRINT CHR$ (4)„CATALOG,D“D 
200 INPUT ,,BSAVE-FILE: TEXT.“;Y$ 

210 PRINT ,,VERTIPPT J/N GET X$: IF X$ < > „N“ THEN 190 
220 HOME : PRINT : PRINT CHR$ (4)„BLOAD TEXT.“Y$ 

230 INVERSE : PRINT , , ABSPEICHERN DES TEXT-FILES": NORMAL 
240 PRINT : PRINT : PRINT , , L AUFWERK-NR . (1 ODER 2): 

250 GET X$: IF X$ < > „1“ AND X$ < > „2“ THEN 250 
260 D = VAL (X$) 

270 HOME : PRINT : PRINT CHR$ (4)„CATALOG,D“D 
280 INPUT „TEXT-FILE: “;Y$ 

290 PRINT „VERTIPPT J/N GET X$: IF X$ < > „N“ GOTO 270 
300 HOME : HTAB 12: INVERSE : PRINT „BITTE WARTEN": NORMAL : 

POKE 34,2: HOME 
310 PRINT CHR$ (4)„MON 0“ 

320 PRINT CHR$ (4)„OPEN“Y$: PRINT CHR$ (4)„DELETE“Y$ 

330 PRINT CHR$ (4)„OPEN“Y$: PRINT CHR$ (4)„WRITE“Y$ 

340 AD = 6401 :Z1 = 32:Z2 = 64:Z3 = 96:Z4 = 128:Z5 = 192:Z6 = 224 
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350 A = PEEK (AD): AD = AD + 1 
360 IF A = Z3 THEN 420 
370 IF A > = Z6 THEN A = A - Z2 
380 IF A > = Z5 THEN A = A + Z1 
390 IF A < Z1 THEN A = A + Z5 
400 IF A < Z2 THEN A = A + Z4 
410 PRINT CHR$ (A);: GOTO 350 

420 PRINT : PRINT CHR$ (4),, CLOSE": PRINT CHR$ (4)„NOMON O": 

PRINT CHR$ (4)„CATALOG“ 

430 POKE 34,0 

440 INVERSE : PRINT „ERNEUT J/N“;: NORMAL : PRINT „ 

450 GET X$: IF X$ = „J“ GOTO 110 
460 IF X$ < > „N“ GOTO 450 

Der PRINT CHR$(A)-Befehl steht bei diesem Programm in Zeile 410. Auch dieses 
Programm ist ein Beispiel daftir, wie erschreckend lange es dauert, wenn der Zugriff 
auf einen Textfile auf der Einzelzeichen-Ebene erfolgt. 


2.6.6. Komma, Doppelpunkt und Anfiihrungszeichen bei Strings 

Da Komma, Doppelpunkt und Anfiihrungszeichen syntaktische Funktionen bei dem 
INPUT-Befehl ubemehmen (technisch am besten beschrieben in dem alten ,, Basic 
Programming Reference Manual", S. 66), kann ein auf der Diskette gespeicherter 
String diese Zeichen nicht alle gleichzeitig enthalten. Es gibt nur zwei Moglichkeiten: 

1. Entweder man verzichtet auf die Anfiihrungszeichen (ASCII-Code 34) und 
kann dann Komma und Doppelpunkt als Bestandteile von Strings auf Textfiles 
speichern, 

2. oder man verzichtet auf Komma und Doppelpunkt und kann dann Anftih- 
rungszeichen als Bestandteile von Strings auf Textfiles speichern. 

Um es klarzustellen: Bei Assembler-Programmen gelten diese Beschrankungen nicht, 
wohl aber bei reinen Applesoft-Programmen. 

Da Komma und Doppelpunkt wichtiger als die doppelten Anfiihrungszeichen ( = 
Gansefiifichen) sind, zumal ja auch noch die einfachen An- und Abfiihrungszeichen 
existieren (ASCII-Codes 96 und 39; letzerer zugleich Apostroph), kann man zu dem 
folgenden, wenig bekannten Trick greifen: 
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1. Alle auf den WRITE-Befehl folgenden PRINT-Statements werden mit 
CHR$(34) eingeleitet: 

10 A$ = „aaa,aaa:aaa“ 

20 PRINT CHR$(4) „OPEN TEST“ : PRINT CHR$(4) „WRITE TEST 1 ' 

30 PRINT CHR$(34) A$ 

40 PRINT CHR$(4) „CLOSE“ 

Ein Semikolon zwischen CHR$(34) und A$, z.B. 

30 PRINT CHR$(34) ; A$ 

dient nur der besseren Lesbarkeit und ist funktional entbehrlich. 

2. Bei alien auf den READ-Befehl folgenden INPUT-Statements ist keine beson- 
dere Syntax zu beachten, doch muB man wissen, dafi bei 

10 PRINT CHR$(4) „OPEN TEST" : PRINT CHR$(4) ,,READ TEST" 

20 INPUT A$ 

30 PRINT CHR$(4) „CLOSE“ 

der Variablen A$ nur der reine String aaa,aaa:aaa und nicht etwa Anfiihrungszei- 
chen + aaa,aaa:aaa zugewiesen wird. 

Der einzige Nachteil dieses Verfahrens ist der, dab nunmehr jedes Feld auf der Dis- 
kette 1 Byte mehr Speicherraum (wegen des Anftihrungszeichens) beansprucht. Bei 
langen Strings fallt dies jedoch kaum ins Gewicht. Das nachfolgende Programmbei- 
spiel demonstriert das CHR$(34)-Verfahren: 

100 REM = = = KOMMA-KOLON-TEST = = = 

110 HOME : INVERSE : PRINT „KOMMA-KOLON- READ-WRITE-TEST": 
NORMAL 

120 PRINT : PRINT : PRINT ,,STARTEN J/N GET X$: IF X$ = „N“ 
THEN END 

130 IF X$ < > „J“ THEN 110 
140 DIM A$(3) 

150 X$ = ,,STIEHL,ULRICH:HEIDELBERG“ 

160 FOR X = 1 TO 3:A$(X) = X$: NEXT 

170 HOME : INVERSE : PRINT „SO HEISST DER STRING:": NORMAL 
180 PRINT : PRINT X$: PRINT : INVERSE : PRINT „3 X SPEICHERN:": 

NORMAL : PRINT 
190 PRINT CHR$ (4)„MONIO“ 
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200 PRINT CHR$ (4)„OPEN STRINGTEST": PRINT CHR$ (4), .DELETE 
STRINGTEST": PRINT CHR$ (4)„OPEN STRINGTEST": PRINT CHR$ 
(4),, WRITE STRINGTEST" 

210 FOR X = 1 TO 3 

220 REM = = = ENTSCHEIDENDE ZEILE 
230 REM = = = MIT CHR$(34) VOR A$ 

240 PRINT CHR$ (34) A$(X) 

250 NEXT 

260 PRINT CHR$ (4)„CLOSE“ 

270 PRINT : INVERSE : PRINT „3 X EINLESEN:": NORMAL : PRINT 
280 PRINT CHR$ (4)„OPEN STRINGTEST": PRINT CHR$ (4),, RE AD 
STRINGTEST" 

290 FOR X = 1 TO 3 
300 INPUT A$(X) 

310 NEXT 

320 PRINT CHR$ (4)„CLOSE“ 

330 PRINT CHR$ (4)„NOMONIO“ 

340 PRINT : INVERSE : PRINT „DAS WURDE EINGELESEN:": NORMAL : 
PRINT 

350 FOR X = 1 TO 3: PRINT A$(X): NEXT 


2.6,7. OPEN-Files 

Die Programmierung wird komplizierter, wenn gleichzeitig mehrere Dateien geoffnet 
sind oder wenn eine Datei nicht geschlossen werden kann, weil laufend oder in Inter- 
vallen auf die Datei zugegriffen wird. 

Der uns bereits bekannte einfachste Fall liegt dann vor, wenn die PRINT- oder 
INPUT-Befehle von WRITE-CLOSE- bzw. READ-CLOSE-Befehlen unmittelbar 
eingeschlossen werden. Was passiert jedoch, wenn zwischendurch Tastatureingaben 
erwartet oder Hinweise am Bildschirm angezeigt werden sollen? In diesem Fall muB 
der READ- oder WRITE-Befehl vorubergehend inaktiviert werden, damit nicht et- 
wa der Bildschirm-Hinweis plotzlich auf der Diskette gespeichert wird. Die voruber- 
gehende Inaktivierung von READ-WRITE- Befehlen ist denkbar einfach durch einen 
reinen PRINT CHR$(4)-Befehl zu realisieren. (Ubrigens filhrt jeder ANDERE 
DOS-Befehl, z.B. PRINT CHR$(4) , .CATALOG", wegen des Ctrl-D zu einer Inak- 
tivierung des momentanen Read- oder Write-Zustandes.) 
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Beispiel 1: 

10 PRINT CHR$(4) „OPEN DATE I “ 

20 PRINT CHR$(4) : REM INAKTIVERT DOS 
30 PRINT „STRING EINGEBEN!" 

40 INPUT X$ 

50 PRINT CHR$(4) „ WRITE DATE I “ 

60 PRINT X$ : GOTO 20 

Hier wilrde eine fehlende Zeile 20 zur Folge haben, daB neben der Variablen X$ auf 
der Diskette ungewollt jeweils der String „STRING EINGEBEN!“ mit abgespei- 
chert werden wiirde. 

Beispiel 2: 

10 PRINT CHR$(4) „OPEN TEST“ 

20 PRINT CHR$(4) „ WRITE TEST" 

30 FOR X = 1 TO 100 : PRINT X : NEXT 
40 PRINT CHRS(4) „CLOSE“ 

50 PRINT CHR$(4) „OPEN TEST" 

60 PRINT CHR$(4) : REM INAKTIVIERT DOS 
70 PRINT „ZAHL EINLESEN J/N INPUT X$ 

80 IF X$ = ,,N“ THEN PRINT CHR$(4) „CLOSE“ : END 
90 PRINT CHR$(4) „READ TEST" : INPUT Z : PRINT Z : GOTO 60 

Hier wtirde eine fehlende Zeile 60 zur Folge haben, daB bei Zeile 70 mit INPUT X$ 
die nachste Zahl automatisch von der Diskette kame, ohne daB man eine Chance 
hatte, durch Tastatureingabe von „N“ das Programm abzubrechen. 

Die voriibergehende DOS-Inaktivierung, die iibrigens nicht mit dem DOS-,,Abhan- 
gen“ durch PR#0 : IN#0 zu verwechseln ist, hat iibrigens den Vorteil, daB even- 
tuelle DOS- oder Applesoft-Fehlermeldungen nicht im Falle des WRITE- 
Aktivzustandes aus Versehen auf der Diskette gespeichert werden. 

Wenn mehrere Dateien gleichzeitig geoffnet sind, kommen oft noch die Parameter 
Slot, Drive und Volume zum Tragen. Beispiel: 

10 PRINT ,,A-DATEI:“ : PRINT 

20 INPUT , ,DATEINAME, SLOT, DRIVE, VOLUME: DAS, SA, DA, VA 
30 PRINT ,,B-DATEI:“ : PRINT 
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40 INPUT „DATEINAME, SLOT, DRIVE, VOLUME: DBS, SB, DB, VB 
50 PRINT CHR$(4) „OPEN“DA$ ,„S“SA ,„D“DA ,„V“VA 
60 READ CHR$(4) „READ“DA$ 

70 PRINT CHR$(4) „OPEN“DB$ ,„S“SB ,„D“DB ,„V“VB 
80 READ CHR$(4) ,,READ“DB$ 

Ein im meinen Augen lastiger Fehler des DOS-Betriebssystems ist der, daB die 
READ- und WRITE-Befehle im Gegensatz zum OPEN-Befehl keine Parameter zu- 
lassen. Deshalb ist es ohne Poke-Befehle nicht moglich, auf mehrere, sich in ver- 
schiedenen Drives und/oder Slots befindliche Dateien gleichzeitig zuzugreifen, ohne 
die jeweilige Datei vorher zu schlieBen. 

Da Apple-Besitzer in der Regel nur iiber 2 Laufwerke verfugen, stellt sich das Pro- 
blem des Slot-Wechsels selten, und Volume-Nummern werden ohnehin kaum be- 
nutzt. Dagegen ist die Notwendigkeit des Drive- Wechsels offenkundig. Angenom- 
men, man wollte zwei in sich sortierte Textfiles, die so groB sind, daB sie nicht kom- 
plett in den RAM-Speicher passen, von Drive 1 nach Drive 2 mischen ( = Merge- 
oder Mischvorgang = Vereinigung zweier in sich sortierter Teildateien zu einer neu- 
en ebenfalls in sich sortierten groBen Gesamtdatei). Zu diesem Zweck miissen vor- 
iibergehend alle drei Dateien offen sein. 

Drive-Wechsel: 

Mit POKE -21912,1 kann man Drive 1 als aktives Drive deklarieren. 

Mit POKE -21912,2 kann man Drive 2 als aktives Drive deklarieren. 

Slot-Wechsel: 

Mit POKE -21910,4 kann man Slot 4 als aktiven Slot deklarieren. 

Mit POKE -21910,6 kann man Slot 6 als aktiven Slot deklarieren, usw. 

Diese Pokes gelten ftir 48K-DOS, also nicht ftir den Fall, daB sich DOS in der Lan- 
guage Card befmdet. 


2. 6.7.1. ,,Schein-Mischen“ (Demo-Programm) 

100 PRINT CHR$(4) „OPEN Al, Dl“ 

110 PRINT CHR$(4) „WRITE Al" 

120 FOR X = 1 TO 1000 
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130 PRINT „AAAAAAAAAAAAAAA“ : NEXT 
140 PRINT CHR$(4) „CLOSE“ 

150 PRINT CHR$(4) „OPEN A2“ 

160 PRINT CHR$(4) „ WRITE A2“ 

170 FOR X = 1 TO 1000 

180 PRINT „AAAAAAAAAAAAAAA“ : NEXT 
190 PRINT CHR$(4) „CLOSE“ 

200 REM SCHEIN-MERGEN 
210 DIM Al$ (100), A2$ (100) 

220 PRINT CHR$(4) „OPEN Al“ 

230 PRINT CHR$(4) „OPEN A 2“ 

240 POKE -21912,2 : REM DRIVE 2 
250 PRINT CHR$(4) „OPEN M“ 

260 FOR X = 1 TO 10 

270 POKE -21912,1 : REM DRIVE 1 

280 PRINT CHR$(4) , ,READ A1 “ 

290 FOR Y = 1 TO 100 : INPUT A1$(X) : NEXT 
300 PRINT CHR$(4) „READ A2“ 

310 FOR Y = 1 TO 100 : INPUT A2$(X) : NEXT 
320 POKE -21912,2 : PRINT CHR$(4) „WRITE M“: REM DRIVE 2 
330 FOR Y = 1 TO 100 : PRINT A1$(X) : PRINT A2$(X) : NEXT 
340 NEXT X 

350 PRINT CHR$(4) „CLOSE“ 

Ohne die angegebenen Poke-Befehle ware es bei den geoffneten Dateien Al, A2 und 
M nicht moglich gewesen, den Drive-Wechsel aus dem Programm heraus vorzuneh- 
men. 

2. 6.7.2. ,,Echtes Mischen “ ( Registerprograinm ) 

Das nachfolgende komplizierte Programm ist ein Teil-Modul zu meinem Register- 
programm, das vor allem fur Register am Ende von Biichern (Stichwort + Seiten- 
zahl) Verwendung findet. Die Dateistruktur ist folgende: 

1 . Feld: Anzahl der Stringpaare (als 6stelliger String) 

2. Feld: CHR$(34) + 1. Stichwort 

3. Feld: CHR$(34) + 1. Seitenzahl 

4. Feld: CHR$(34) + 2. Stichwort 

5. Feld: CHR$(34) + 2. Seitenzahl 
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usw. bis zu den 2 letzten Feldern, die ,,ULI“, ,,ULI“ als programmtechnische End- 
marker haben. 

Beispiel: 

000004 
,, Computer 
„10 

„DOS 3.3 
,,30 

,, Apple lie 

„20 

,,formatieren 

„70 

„ULI 

„ULI 

Es sind also sowohl die Stichworter als auch die Seitenzahlen als Strings gespeichert, 
da das Programmpaket auch fur andere Register, z.B. Glossare, verwendet werden 
kann. Es werden automatisch bis zu 20 in sich bereits sortierte, beliebig grofle Datei- 
en paarweise von Drive 1 eingelesen, gemischt und als neue Misch-Datei auf Drive 2 
abgespeichert. Das paarweise Mischen muB solange vollzogen werden, bis nur noch 
eine einzige ,,Monster“-Enddatei iibrigbleibt, die ilbrigens mehr als 300.000 Zeichen 
Umfang haben kann. Da das Mischen ein langwieriger ProzeB ist, ist das Applesoft- 
Programm mit dem TASC compiliert (mit Origin $0806). AuBerdem wird Diversi- 
DOS benutzt, das in die Language Card geschoben wird. Aber auch dies reicht noch 
nicht aus, da Sortieren und Mischen nach DUDEN erfolgen soil, dessen Alphabeti- 
sierungsrichtlinien sich bekanntlich nicht mit der ASCII-Code-Reihenfolge decken. 
Deshalb erfolgt die Umcodierung durch ein Assemblerprogramm, das die Strings 
auch nicht mehr mit dem INPUT-Befehl, sondern mit dem Monitor-GETLN-Befehl 
($FD6A) einliest, umcodiert und dann in der ,,Schein-String-Zeile“ 150 ablegt, so 
daB das compilierte Applesoft-Programm diesen String iibernehmen kann. Auf diese 
Weise — Diversi-DOS, DOS in der LC, Compilierung, Assemblerroutinen — ist das 
Registermischprogramm etwa 10-20 mal schneller, als ein entsprechendes 
,,normales“ Applesoft-Programm unter DOS 3.3 ware. Was allein lOmal schneller 
bedeutet, wird einem klar, wenn man statt 1 Minute z.B. 10 Minuten am Bildschirm 
wartet. 

Wenn DOS oder Diversi-DOS in der Language Card liegt, ist das Umschalten von 
Drive 1 nach Drive 2 bei geoffneten Textfiles besonders kompliziert und kann wegen 
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des erforderlichen ,, Bank-Selecting” nur durch ein kleines Assemblerprogramm rea- 
lisiert werden. Das Umschalten geschieht in dem nachstehenden Programm durch 
die Befehle CALL 826 (= Drive 1) und CALL 830 (= Drive 2). Femer kommt in 
dem Programm CALL 849, das das Sortierwort unmodifiziert mit GETLN einliest, 
sowie CALL 875 vor, das die Umcodierung vornimmt. 

100 REM = = = REGISTERMISCHER = = = 

110 REM ! INTEGER* 

120 REM ! DEFCOMMONA,D 
130 REM !DEFCOMMOND$(20),D$ 

140 GOTO 190 

150 M$ = „“:M$ = LEFTS („? 

“,MM): RETURN 

160 CALL 849:MM = PEEK (255): GOSUB 150:M0$ = MS 
170 CALL 875:MM = PEEK (255): GOSUB 150:C0$ = M$ 

180 INPUT NOS: RETURN 

190 POKE 846,10: POKE 847,24: REM S180A:?— 

200 ONERR GOTO 220 
210 GOTO 280 

220 PRINT CHRS (4): PRINT CHRS (4)„CLOSE“ : IF PEEK (222) = 9 THEN 
PRINT CHRS (4)„DELETE“ AOS 
230 TEXT : HOME : PRINT „FEHLER-NR. “ PEEK (222) 

240 PRINT CHRS (7) 

250 PRINT „W = WEITER 

260 GET D$: IF D$ < > „W“ THEN 260 

270 REMMENUE 

280 HOME : INVERSE : PRINT „ REGISTERMISCHER “: NORMAL 
290 PRINT : PRINT „(MAX.10 SORTIERTE DATEIPAARE MISCHBAR)“ 
300 PRINT : PRINT „(AUSGANGSDATEIEN,D1 -> ZIELDATEIEN,D2)“ 
310 PRINT : PRINT „1 MISCHEN VON DATEIPAAREN“ : PRINT : PRINT 
„5 UEBERTRAGEN EINER RESTDATEI“: PRINT : PRINT „0 
HAUPTMENUE 1 ‘ : PRINT 

320 INVERSE : PRINT „VON ULRICH STIEHL - VERSION V. 01.02.84“: 
NORMAL : PRINT 

330 GET D$: ON D$ = „1“ GOTO 350: ON D$ = „5“ GOTO 940: ON D$ = 
„0“ GOTO 540: GOTO 330 
340 REM DATEIENEINGABE 
350 CLEAR : DIM D$(20) 

360 HOME : PRINT : PRINT CHRS (4)„CATALOG,Dl“: INVERSE : 
PRINT „ RETURN ALLEIN = EINGABEENDE“: NORMAL 
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370 D = 0 

380 D = D + 1: INPUT „A-DATEI:“;D$(D) 

390 D = D + 1; INPUT „B-DATEI:“;D$(D) 

400 IF D$(D - 1) = AND D$(D) = AND D = 2 THEN 280 

410 IF D$(D - 1) = AND D$(D) = THEN D = D - 2: GOTO 440 

420 IF D$(D - 1) = OR D$(D) = THEN 360 

430 IF D < 19 THEN 380 

440 PRINT „R1CHT1G J/N 

450 GET D$: ON D$ = „N“ GOTO 350: IF D$ < > „J“ GOTO 450 
460 GOSUB 530: PRINT : FOR X = 1 TO D: PRINT CHRS 
(4),,UNLOCK“D$(X),„Dl“: NEXT 

470 HOME : PRINT : PRINT CHRS (4)„CATALOG,D2“: INPUT „ZIEL- 
DATEINAME:“;D$: ON D$ = GOTO 470: PRINT „RICHTIG J/N 
480 GET X$: ON X$ = „N“ GOTO 470: IF X$ < > „J“ GOTO 480 
490 REM MISCHSTART 
500 A = — 1: HOME 

510 A = A + 2: IF A + 1 < = D THEN 570 
520 HOME : PRINT „MISCHEN FERTIG !“: GOTO 240 
530 HOME : HTAB 14: VTAB 10: INVERSE : PRINT „BITTE WARTEN“: 
NORMAL : RETURN 

540 HOME : INVERSE : PRINT , .PROGRAMMDISKETTE IN DRIVE 1“: 
NORMAL : PRINT CHRS (7): INPUT , , HAUPTMENUE EINLESEN 
JA/N “;D$: IF D$ < > „JA“ THEN 280 
550 GOSUB 530: PRINT : PRINT CHRS (4)„BRUN 
REGISTERSTARTER. OB J ,D 1 “ 

560 REM = = = MISCHEN = = = 

570 CLEAR :L = 150: DIM T$(150),I$(150) 

580 GOSUB 530: HTAB 1: VTAB 1: PRINT D$(A): PRINT D$(A + 1) 

590 REM ERSTER STRING 

600 A1S = D$(A):A2$ = D$(A + 1) 

610 AOS = D$ + „.M“ + STRS ((A + 1) / 2) 

620 PRINT : PRINT CHRS (4)„OPEN“Al$„,Dl“: PRINT CHRS 
(4)„READ“A1$: INPUT X$:X = VAL (X$) 

630 PRINT CHRS (4)„OPEN“A2$: PRINT CHRS (4),,READ“A2$: INPUT 
Y$:Y = VAL (Y$) 

640 CALL 830: REM LAUFWERK 2 

650 PRINT CHRS (4),, OPEN" AOS: PRINT CHRS (4)„WRITE“A0$:X = X 
+ Y:X$ = STRS (X):Y$ = „000000“:X$ = LEFTS (Y$,6 - LEN (X$)) + 
X$: PRINT X$ 

660 CALL 826: REM LAUFWERK 1 
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670 PRINT CHR$ (4)„READ“A1S: GOSUB 160:M1$ = M0$:C1$ = C0$:N1$ 

= NOS 

680 PRINT CHR$ (4),,READ“A2$: GOSUB 160:M2$ = M0$:C2$ = C0$:N2$ 

= NOS 
690 B = 1 

700 IF CIS > C2$ GOTO 780 

710 REM = = = = Cl$< =C2$ = = = = 

720 T$(B) = M1$:I$(B) = Nl$ 

730 B = B + 1: IF B > L THEN GOSUB 900 

740 PRINT CHRS (4)„READ“A1$: GOSUB 160:M1$ = M0$:C1$ = C0$:N1$ 

= NOS 

750 IF MIS = „ULI“ AND Nl$ = „ULI“ THEN PRINT CHRS 

(4)„CLOSE“Al$:A$ = A2$:T$(B) = M2$:I$(B) = N2S: GOTO 840 
760 GOTO 700 

770 REM = = = = C1$>C2$ = = = = 

780 T$(B) = M2$:I$(B) = N2S 

790 B = B + 1: IF B > L THEN GOSUB 900 

800 PRINT CHRS (4)„READ“A2$: GOSUB 160:M2$ = M0$:C2$ = C0$:N2$ 

= NOS 

810 IF M2$ = „ULI“ AND N2S = „ULI“ THEN PRINT CHRS 

(4)„CLOSE“A2$:A$ = A1$:T$(B) = M1$:I$(B) = N1S: GOTO 840 
820 GOTO 700 
830 REM AS = RESTDATEI 
840 B = B + 1: IF B > L THEN GOSUB 900 
850 PRINT CHRS (4)„READ“A$: INPUT T$(B): INPUT I$(B) 

860 IF T$(B) < > „ULI“ AND I$(B) < > „ULI“ GOTO 840 
870 L = B: GOSUB 900 

880 PRINT CHRS (4)„CLOSE“: PRINT CHRS (4)„DELETE“A1$,„D1“: 

PRINT CHRS (4)„DELETE“A2$: GOTO 510 
890 REM SPEICHERN EINES L-BLOCKS 
900 CALL 830 

910 PRINT CHRS (4)„WRITE“A0$: FOR X = 1 TO L: PRINT CHRS 
(34);T$(X): PRINT CHRS (34);I$(X): NEXT 
920 FOR X = 1 TO L:T$(X) = „“:I$(X) = NEXT : CALL 826:B = 1: 
RETURN 

930 REM UBERTRAGEN 

940 CLEAR :L = 150: DIM T$(150),I$(150): HOME : INVERSE : PRINT 
„UEBERTRAGEN EINER DATEI PRINT „VON DRIVE 1 NACH 
DRIVE 2“: NORMAL 

950 PRINT : PRINT „1 = ZURUECK“: PRINT : PRINT „0 = UEBER- 
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TRAGEN“: PRINT 

960 GET D$: ON D$ = „1“ GOTO 280: IF D$ < > „0“ GOTO 960 
970 HOME : PRINT : PRINT CHRS (4)„CATALOG,Dl“: INPUT ,, ALTER 
DATEINAME: “;X$: ON X$ = GOTO 940: PRINT 
,,RICHTIG J/N 

980 GET Y$: ON Y$ = „N“ GOTO 970: IF Y$ < > „J“ GOTO 980 
990 HOME : PRINT : PRINT CHRS (4)„CATALOG,D2“: INPUT „NEUER 
DATEINAME: “;A0$: ON AOS = X$ GOTO 940: PRINT 
„RICHTIG J/N 

1000 GET Y$: ON Y$ = „N“ GOTO 990: IF Y$ < > „J“ GOTO 1000 
1010 GOSUB 530: PRINT : PRINT CHRS (4)„OPEN“X$,„Dl“: PRINT CHRS 
(4)„READ“X$: INPUT Y$:B = VAL (Y$) 

1020 PRINT CHRS (4)„OPEN“AO$„,D2“: PRINT CHRS (4) „ DELETE “ AOS : 
PRINT CHRS (4),, OPEN" AOS: PRINT CHRS (4)„WRITE“A0S: 

PRINT Y$ 

1030 IFB > LTHEN 1110 
1040 REM B< =L;B + 1 = ,,ULI“ 

1050 CALL 826 

1060 PRINT CHRS (4)„READ“X$: FOR X = 1 TO B + 1: INPUT T$(X): 

INPUT I$(X): NEXT 
1070 CALL 830 

1080 PRINT CHRS (4)„WRITE“A0$: FOR X = 1 TO B + 1: PRINT CHRS 
(34);T$(X): PRINT CHRS (34);I$(X): NEXT : PRINT CHRS (4)„CLOSE“ 
1090 PRINT CHRS (4)„DELETE“X$„,D1“: GOTO 280 
1100 REM B>L;D = REST 
1110 A = INT (B / L):D = B + 1 - A • L 
1120 FOR Z = 1 TO A 
1130 CALL 826 

1140 PRINT CHRS (4)„READ“X$: FOR X = 1 TO L: INPUT T$(X): INPUT 
I$(X): NEXT 
1150 CALL 830 

1160 PRINT CHRS (4)„WRITE“A0$: FOR X = 1 TO L: PRINT CHRS 
(34);T$(X): PRINT CHRS (34);I$(X): NEXT 
1170 NEXT Z 
1180 CALL 826 

1190 PRINT CHRS (4)„READ“X$: FOR X = 1 TO D: INPUT T$(X): INPUT 
I$(X): NEXT 
1200 CALL 830 

1210 PRINT CHRS (4)„WRITE“A0$: FOR X = 1 TO D: PRINT CHRS 
(34);T$(X): PRINT CHRS (34);I$(X): NEXT 
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1220 PRINT CHR$ (4)„CLOSE“: PRINT CHR$ (4)„DELETE“X$,„D1“: 



GOTO 280 





5 ASM 




i 


ORG 

826 





3 

******************************** 





4 

* 







5 

HC08B 

EQU 

f C08B 





6 

HC08 1 

EQU 

TC081 





7 

HC083 

EQU 

TC083 





8 

HEA 68 

EQU 

tEA 68 





9 

HC082 

EQU 

*C082 





10 

* 







11 

* 







12 

******************************** 





13 

* 



033 A: 

A9 

01 


14 

DRIVE 1 

LDA 

#$01 5826 

033C s 

DO 

02 


15 


BNE 

DRIVE 

033E : 

A9 

02 


16 

DRIVE2 

LDA 

#$02 ; 830 

0340 : 

AE 

83 

CO 

17 

DRIVE 

LDX 

HC083 

0343: 

AE 

83 

CO 

18 


LDX 

HC083 

0346: 

8 D 

68 

EA 

19 


STA 

HE A 68 

0349: 

AD 

82 

CO 

20 


LDA 

HC082 

03 4 C : 

60 



21 


RTS 






22 

* 







23 

******************************** 





24 

* 







25 

' STRLEN 

EQU 

255 ; $FF 





26 

PUFFER 

EQU 

$20 1 ; NACH " 





27 

GETLN 

EQU 

$FD 6 A 





28 

* 



034D: 

9D 

FF 

FF 

29 

POKER 

STA 

$FFFF , X ; 846/84“ 

0350: 

60 



30 


RTS 






31 

* 







32 

* DARF 

KEIN NULLS TRING SEIN, 





33 

* D.H. 

NUR RETURN! 1 ! 





34 

* 



0351 : 

20 

6 A 

FD 

35 

GETLN 1 

JSR 

GETLN ; 849 

0354 : 

A 2 

00 


36 


LDX 

#0 

0356 : 

BD 

01 

02 

37 / 

M0VESTR1 LDA 

PUFFER , X 

0359: 

29 

7F 


38 


AND 

#*7F 

035B : 

9D 

01 

02 

39 


STA 

PUFFER, X 

035E : 

C9 

OD 


40 


CMP 

#*0D ; RETURN 

0360: 

FO 

06 


41 


BEG! 

MOVEEXIT 

0362 : 

20 

4D 

03 

42 


JSR 

POKER 

0365 : 

E 8 



43 


I NX 


0366 : 

DO 

EE 


44 


BNE 

MOVESTRl 

0368: 

86 

FF 


45 

MOVEEXIT STX 

STRLEN 

036 A: 

60 



46 


RTS 






47 

* 







48 

******************************* 





49 

* 




036 B: 

A2 

00 

50 

GETLN2 

LDX 

#0 

; 875 

036D: 

AO 

00 

51 


LDV 

#0 





52 

* 




036F: 

B9 

01 02 

53 

MQVESTR2 

LDA 

PUFFER , Y 


0372: 

C9 

OD 

54 


CMP 

#$0D 

; RETURN 

0374: 

FO 

4C 

55 


BEQ 

EX IT 1 





56 

* 




0376: 

C9 

7E 

57 


CMP 

#$7E 

;B 

0378: 

FO 

2E 

58 


BEQ 

ESZETT 


037 A: 

C9 

7D 

59 


CMP 

#$7D 

; u 

03 7C: 

FO 

2E 

60 


BEQ 

UBUCHST 


037E: 

C9 

7C 

61 


CMP 

#$7C 

5 6 

0380: 

FO 

2 E 

62 


BEQ 

OBUCHST 


0382: 

C9 

7B 

63 


CMP 

#$7B 

,a 

0384: 

FO 

2E 

64 


BEQ 

ABUCHST 





65 

* 




0386 : 

C9 

5D 

66 


CMP 

#$5D 

; u 

0388 : 

FO 

22 

6 7 


BEQ 

UBUCHST 


038 A: 

C9 

5C 

68 


CMP 

#$5C 

1 ° 

038C : 

FO 

22 

69 


BEQ 

OBUCHST 


03 8 E : 

C9 

5B 

70 


CMP 

#$5B 

; 4 

0390 : 

FO 

22 

71 


BEQ 

ABUCHST 





72 

* 




0392: 

C9 

61 

73 


CMP 

#$61 

; a--z 

0394: 

BO 

22 

74 


BCS 

GRBUCHST 


0396: 

C9 

5E 

75 


CMP 

#$5E 

5 ■•■■■ 

0398: 

BO 

25 

76 


BCS 

NICHTS 


039 A: 

C9 

41 

~y~y 


CMP 

#$41 

; A~Z 

039C : 

BO 

ID 

78 


BCS 

M0VESTR3 





79 

* 




039E : 

C9 

30 

80 


CMP 

# ' 0 ' 


03 AO: 

90 

ID 

81 


BCC 

NICHTS 

; <0 

03 A2 : 

C9 

3 A 

82 


CMP 

# - : ' 


03 A4: 

90 

15 

83 


BCC 

M0VESTR3 

; ZIFFER 

03 A 6 : 

BO 

17 

84 


BCS 

NICHTS 





85 

* 




03 A 8 : 

A 9 

53 

86 

ESZETT 

LDA 

#'S' 

; B >S 

03AA: 

DO 

OF 

87 


BNE 

M0VESTR3 


03 AC: 

A9 

55 

88 

UBUCHST 

LDA 

# ' u - 

5 a+A .>A 

03 AE: 

DO 

OB 

89 


BNE 

M0VESTR3 


03 BO: 

A 9 

4F 

90 

OBUCHST 

LDA 

#' 0 ' 

; 5+o>0 

03B2 : 

DO 

0 

91 


BNE 

M0VESTR3 


03 B4: 

A9 

41 

92 

ABUCHST 

LDA 

# • A' 

5 a+A >A 

03B6 : 

DO 

03 

93 


BNE 

MO VEST R3 


03B8 : 

38 


94 

GRBUCHST 

SEC 


; KL >GR 

03B9 : 

E9 

20 

95 


SBC 

#$20 





96 

* 




03 BB: 

20 

4D 03 

97 

M0VESTR3 

JSR 

POKER 


03 BE : 

E 8 


98 


INX 


; LENGTH 

03 BF: 

C 8 


99 

NIGHTS 

I NY 


; PUFFCNT 

03CO: 

DO 

AD 

1 00 


BNE 

M0VESTR2 


03C2 : 

EO 

00 

101 

EX I T 1 

CPX 

#0 


03C4 : 

DO 

06 

102 


BNE 

EXIT2 
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03C6 : 

A9 

2F 

103 

LDA # ' / ' ; LEER 

03C8: 

20 

4D 03 

104 

J SR POKER 

03CB: 

E8 


105 

INX 

03CC: 

86 

FF 

106 E X I T 2 

STX STRLEN 

03CE s 

60 


107 

RTS 


Naheres iiber die GETLN-Routine steht im Teil II, Kapitel 4. Insbesondere beachte 
man, dab GETLN im Gegensatz zu INPUT das Anftihrungszeichen mit einliest. 


2.6.8. Sequentielle und Random-Files 

Sequentielle File sind Textfiles mit variablen Feldlangen und indirektem Zugriff, 
Random-Files sind Textfiles mit konstanten Feldlangen und direktem Zugriff. (Ran- 
dom bzw. genauer Random Access bedeutet wahlfreier = direkter Zugriff auf den 
Diskettensektor.) 

Die bisher behandelten Beispiele waren — auch wenn dies nicht ausdrilcklich er- 
wahnt wurde — sogenannte sequentielle Textfiles. Ein typischer sequentieller Text- 
file wie z.B. bei dem oben beschriebenen Registerprogramm setzt sich aus einer belie- 
bigen Anzahl unterschiedlich — die Betonung liegt auf unterschiedlich! — langer 
Felder zusammen, die wie eine Sequenz ( = Folge) aneinandergereiht und lediglich 
durch Returns getrennt sind. DOS hangt an das Ende eines Textfiles automatisch ein 
Ctrl-0 als sozusagen DOS-internen Endmarker. Ein sequentielle Dateien verarbeiten- 
des Applesoft- Programm sollte dariiber hinaus eigene „Buchfiihrung“ machen, da- 
mit die ,,END OF FILE“-Fehlermeldung vermieden wird. Bei dem obigen Register- 
programm gibt es 

1. als ersten String der Datei einen Anfangsmarker als normierte, 6stellige, 
rechtsbiindig ausgeschlossene Zahl, die die Anzahl der Doppelstrings (Stich- 
wort + Seitenzahl) beinhaltet, sowie 

2. als letzte 2 Strings der Datei zwei Endmarker („ULI“, ,,ULI“), damit man nie- 
mals beim Ctrl-0 ankomnv 

Warum eine normierte 6stellige Zahl als String, mag man sich fragen. Da sequentielle 
Dateien Felder mit unterschiedlicher Lange haben und Zahlen selbst eine unter- 
schiedliche Anzahl von Speicherstellen auf der Diskette einnehmen konnen (1, 10, 
100, 1000 usw.), ware es bei einer sequentiellen Datei nachtraglich nicht mehr mog- 
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lich den Anfangsmarker korrekt durch einen neuen Zahlenwert (z.B. bei gemischten 
Dateien) zu uberschreiben. 

Sequentielle Dateien sind Textfiles mit indirektem Zugriff analog zu Dateien, die auf 
Datenkassetten, Lochstreifen usw. gespeichert sind. Wenn man z.B. das 150. und 
nur dieses 150. Feld einer sequentiellen Datei einlesen mochte, so bleibt einem nichts 
anderes ttbrig, als alle vorangehenden 149 Felder mit einzulesen, da DOS keine Mog- 
lichkeit hat, auf sozusagen rechnerischem Wege zu ermitteln, auf welchem Sektor 
und auf welcher Spur sich exakt das 150. Feld befindet. Man konnte zwar auch hier- 
ftir eine ,,Buchhaltung“ einfuhren, doch wurde diese ihrerseits besonders bei kurzen 
Feldern relativ viel Platz auf der Diskette beanspruchen, von dem Zeitaufwand fur 
die Anlage einer solchen ,,Buchftihrung“ ganz zu schweigen. Aber selbst wenn all 
dies kein Hindernis ware, dann ware diese ,,Buchfiihrung“ trotzdem ein (fur Disket- 
tenlaufwerke) nutzloses Unterfangen, denn nachtraglich labt sich bei einem sequen- 
tiellen File kein Feld mehr erweitern oder kurzen, ohne dab die Datei insgesamt neu 
abgespeichert wird. Dies ist zwar bei Festplattenlaufwerken mit hoher Zugriffszeit, 
nicht jedoch bei normalen Diskettenlaufwerken mit vergleichsweise sehr geringer Zu- 
griffszeit, akzeptabel. 

Der grobe Vorteil sequentieller Dateien beruht auf der Kompaktheit der Datenspei- 
cherung, da gewissernmaben jede Speicherstelle auf der Diskette voll ausgenutzt 
wird. Hinsichtlich des Verwendungszwecks eignen sich sequentielle Files fiir solche 
Dateien, bei denen man nicht auf das EINZELNE Feld zugreifen mub, sondern wo 
die GESAMTHEIT der Felder im Vordergrund steht. Ein typisches Beispiel fiir se- 
quentielle Dateiverwaltung ist damit ein Registerprogramm, weil hier die Stichworter 
wahllos (z.B. nach dem Buchumbruch) eingegeben werden und die fertig sortierte 
Enddatei mit der Obertragung in die Photosetzmaschine ihren Zweck erfullt hat. 

Wenn dagegen Datensatze, z.B. Kundenadressen usw., standig gepflegt werden miis- 
sen (durch Neueingabe, Anderung und Loschung), sollte man anstelle sequentieller 
Dateien Random-Files anlegen. Random-Dateien sind Dateien mit direktem Zugriff, 
da die Records oder Datensatze eine vordefinierte Lange haben. Nehmen wir an, ei- 
ne Random-Datei bestehe aus 501 Records — numeriert von 0-500 — mit je 128 Zei- 
chen Lange, dann ist es fiir DOS ein leichtes auszurechnen, auf welchem Sektor und 
auf welcher Spur sich z.B. der 150. Record befindet. Da ein Sektor 256 Bytes um- 
fabt, passen in diesem Fall 2 Records auf einen Datensektor. Im 1. Datensektor be- 
finden sich die Records 0 und 1, im 2. Datensektor die Records 2 und 3 usw. Somit 
befindet sich der 150. Record in der ersten Halfte des 75. Datensektors. 

Random-Files werden geoffnet mit einer Langenabgabe (L = Recordlange) als zu- 
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satzlicher Parameter zum OPEN-Befehl. Ferner mufl bei jedem READ- Oder 
WRITE-Befehl die Record-Nummer (R) spezifiziert werden. Beispiel: 

10 PRINT CHR$(4) „OPEN TELEFONLISTE,L50“ 

20 R = 1 

30 PRINT CHR$(4) 

40 INPUT ,,NAME + TEL. T$ 

50 PRINT CHR$(4) „WRITE TELEFONLISTE,R“R 
60 PRINT X$ : R = R + 1 : GOTO 30 

Die Record-Nummern R beginnen immer bei 0 und gehen maximal bis 32767. Die 
Record-Lange L muB im Bereich 1-32767 liegen. Normalerweise benutzt man den 
Record 0 nicht fur eigentliche Daten, sondern z.B. fur die Speicherung der Zahl der 
bisher belegten Records. Ein einzelner Record besteht meist aus mehreren Feldem, 
z.B. Vorname, Zuname, StraBe usw. In diesem Sinne ist Record das Fremdwort fur 
Datensatz. Speicher- und programmtechnisch lassen sich 2 Typen von Datensatzen 
unterscheiden: 

Typ 1: Felder durch Returns abgegrenzt (Auszug) 

10 PRINT CHR$(4) „OPEN ADRESSEN,L132“ : REM 128 + 4 RETURNS 
20 R = 1 
30 PRINT CHR$(4) 

40 INPUT „ VORNAME: V$ 

50 INPUT ,, ZUNAME: Z$ 

60 INPUT ,,STRASSE: S$ 

70 INPUT „PLZ und ORT: P$ 

80 F = LEN (V$) + LEN (Z$) + LEN (S$) + LEN (P$) 

90 IF F > 128 THEN PRINT „ RECORD ZU GROSS 11 : GOTO 30 
100 PRINT CHR$(4) „WRITE ADRESSEN,R“R 

110 PRINT V$ : PRINT Z$ : PRINT S$ : PRINT P$ : R = R + 1 : GOTO 30 

Das Einlesen wtlrde beim Typ 1 so aussehen (Auszug): 

500 PRINT CHR$(4) ,,READ ADRESSEN,R“R 
510 INPUT V$ : INPUT Z$ : INPUT S$ : INPUT P$ 

520 PRINT CHR$(4) 

530 PRINT V$ : PRINT Z$ : PRINT S$ : PRINT PS 
540 RETURN 
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Typ 2: Record durch Return abgegrenzt (Auszug) 

10 PRINT CHR$(4) „OPEN ADRESSEN,L129“ : REM 128 + 1 RETURN 
20 R = 1 
30 PRINT CHR$(4) 

40 INPUT „ VORNAME: VS : V = LEN (V$) : IF V > 32 GOTO 40 

50 INPUT ,, ZUNAME: 11 ; Z$ : Z = LEN (Z$) : IF Z > 32 GOTO 50 
60 INPUT „STRASSE: 11 ; S$ : S = LEN (S$) : IF S > 32 GOTO 60 
70 INPUT ,,PLZ und ORT: P$ : P = LEN (P$) : IF P > 32 GOTO 70 
80 PRINT CHR$(4) „ WRITE ADRESSEN,R“R 
90 F = V : PRINT V$; : GOSUB 140 

100 F = Z : PRINT Z$; : GOSUB 140 

110 F = S : PRINT S$; : GOSUB 140 

120 F = P : PRINT PS; : GOSUB 140 

130 PRINT : R = R + 1 : GOTO 30 
140 D = 32 - F : IF D = 0 THEN 180 
150 FOR X = 1 TO D 
160 PRINT CHR$(32); : REM LEERTASTE 
170 NEXT X 
180 RETURN 

Das Einlesen wilrde beim Typ 2 so aussehen (Auszug): 

500 PRINT CHR$(4) ,,READ ADRESSEN,R“R 
510 INPUT AS : PRINT CHR$(4) 

520 PRINT LEFTS (AS, 32) 

530 PRINT MIDS (AS, 33, 32) 

540 PRINT MIDS (A$, 65, 32) 

550 PRINT RIGHTS (AS, 32) 

560 RETURN 

Beim Typ 1 ist jedes einzelne Feld durch ein Return vom nachfolgenden abgegrenzt, 
wahrend beim Typ 2 lediglich das letzte Feld des Records, also der Record selbst, ein 
Return erhalt. Der Typ 1 ist trotz der zusatzlichen Returns speicherokonomischer, da 
keine unnotigen Leertasten am Feldende verschwendet werden. Fur Bildschirmmas- 
ken sind derartig variable Feldlangen jedoch ungeeignet. Ferner kann bei solchen 
Feldern kein formatierter, tabellarischer Ausdruck mehr zustande kommen, denn 
wie will man eine mehrspaltige Tabelle einrichten, wenn z.B. die Strafle mal 35 Zei- 
chen und mal 15 lang ist. Hinzu kommt, daB die Datentypistin sozusagen erst am 
SchluB weiB, ob sie kiirzen muB oder nicht, da ja die tatsachliche Recordlange erst 
mit der Eingabe des letzten Feldes vorliegt. 
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Der nachfolgende kleine Random-Test zeigt, daB Random-Files natiirlich nicht nur 
„at random 4 *, d.h. zufallig Oder wahlfrei, sondern auch sequentiell gelesen werden 
konnen. Allerdings ist jeweils der R-Parameter erforderlich. 

100 REM = = = RANDOM-TEST = = = 

110 PRINT CHR$ (4),,OPENRANDOM,L200“ 

120 FOR X = 1 TO 200 

130 PRINT CHR$ (4)„WRITERANDOM,R“X 

140 PRINT X • 1.2345 

150 NEXT X 

160 PRINT CHR$ (4)„CLOSE“ 

170 INPUT ,,(1-200)?“ ; A 
180 A = A- 1.2345 

190 PRINT CHR$ (4)„OPENRANDOM,L200‘ 4 
200 FOR X = 1 TO 200 
210 PRINT CHR$ (4)„ RE ADRANDOM, R‘‘X 
220 INPUT B 

230 IF A = B THEN PRINT A,B: GOTO 270 
240 NEXT X 

250 PRINT CHR$ (4)„CLOSE 44 
260 END 

270 PRINT „ENDE‘‘ 

280 PRINT CHR$ (4)„CLOSE 44 


2. 6.8.1 Vorformatierte Random-Files 

Es gibt jedoch auch die Moglichkeit, Random-Files anzulegen, die zugleich sequen- 
tielle Dateien sind. Bei dem obigen Random-Test wird jeweils nur eine einzige Zahl 
in einem 200stelligen Record abgelegt. In Erweiterung unserer Erlauterungen zur 
Struktur von Textfiles gilt fur Random-Files, daB nicht nur nach dem allerletzten Re- 
cord, sondern auch zwischen den einzelnen Records NUL-Codes (Ctrl-0) abgespei- 
chert sein konnen. Zur Verdeutlichung folgendes Extrembeispiel: 

10 PRINT CHR$(4) „OPEN TEST 44 
20 PRINT CHR$(4) „ DELETE TEST 44 
30 PRINT CHR$(4) „OPEN TEST,L 44 100 
40 PRINT CHR$(4) „WRITE TEST, R 44 1 000 
50 PRINT „1 44 
60 PRINT CHR$(4) „CLOSE 44 
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Dieses Programm wurde einen Random-File erzeugen, der (spater) fast die ganze 
Diskette einnehmen wtirde, obgleich zunachst nur eine einzige ,,1 44 abgespeichert 
ware. Ware die Datendiskette zuvor initialisiert worden, dann hatte die TEST-Datei 
folgende Struktur: 

100 mal 1000(0-999) Ctrl-0 's + ,,1“ + Return + 98 Ctrl-0 's 

Hatte es sich dagegen um eine alte Diskette gehandelt, auf der zahlreiche Files bereits 
geloscht worden waren, dann wurde die TEST-Datei anstelle ,,sauberer 44 Ctrl-0 's 
,,wirren Schrott 44 in Form von Resten alter Programme usw. enthalten. 

Besser ist es, wenn man Random-Dateien quasi vorformatiert in dem Sinne, daB 
man die ganze Datei z.B. mit Leertasten, Nullen o.a. beschreibt mit der Folge, dafi 
solch eine Random-Datei dann auch wie eine sequentielle Datei behandelt werden 
kann, weil das Ctrl-0 dann nur noch am Ende der Datei vorkommt. Gegenstiick zum 
obigen Extrembeispiel: 

10 PRINT CHR$(4) „OPEN TEST 44 : PRINT CHR$(4) „ WRITE TEST 44 
20 FOR X = 0 TO 1000 

30 FOR Y = 1 TO 99 : PRINT CHR$(32); : NEXT Y : PRINT 
40 NEXT X 

50 PRINT CHR$(4) ,, CLOSE" 

Ein weiterer Grund spricht filr die ,,Vorformatierung 44 von Random-Files. Nicht- 
vorformatierte und sozusagen ,,at random 44 beschriebene Files sind auf der Diskette 
nicht in homogener Reihenfolge (in auf- oder absteigenden Spuren) abgespeichert 
mit der Folge, daB die Zugriffsgeschwindigkeit entsprechend sinkt. Hinzu kommt, 
daB DOS bei Random-Files nur eine ,,unintelligente Buchfuhrung 44 macht, die sogar 
die Anlage von Randon-Files und/oder Random-Records zulaBt, die spater nie mehr 
vollstandig beschrieben werden konnen! Ein Beispiel: 

100 L = 256 • 4 
110 E = 400 

120 PRINT CHR$(4) „OPEN TEST,L 44 L 

130 FOR R = 0 TO E 

140 PRINT CHR$(4) „WRITE TEST,R‘‘R 

150 PRINT R + 1000 

160 NEXT R 

170 PRINT CHR$(4) „CLOSE 44 



60 


61 


2. DOS fttr Applesoft-Programmierer 

(Die nachfolgenden Uberlegungen setzen Kenntnisse aus dem Teil II dieses Buches 
voraus, so dafi der Leser ggf. diesen Absatz uberspringen moge.) 

Bei diesem Programm betragt die Feldlange 4 Sektoren Oder 256 mal 4 = 1024 Bytes 
= 1 Kilobyte. Es werden 401 (0-400) Records mit jeweils einer 4stelligen Zahl (1000- 
1400) + Return beschrieben. Die Datei wird in Zeile 170 ,,ordnungsmafiig“ ohne 
jegliche Fehlermeldung geschlossen. 1st jedoch wirklich alles in Ordnung? Gewifi 
nicht! Denn eine normale DOS 3.3-Diskette mit 140 Kilobytes Bruttospeicherkapazi- 
tat kann naturlich nicht 401 Kilobytes an Daten umfassen. Was ist passiert? Da mit 
Zeile 150 nur ein — inklusive Return — 5 Bytes langes Feld auf die Diskette geschrie- 
ben wurde, hat DOS fur jeden Record nur 1 Sektor belegt, jedoch bereits 3 weitere 
Sektoren vorgemerkt. Dieses Vormerken geschieht dadurch, daB in der TSL fur je 3 
reservierte Sektoren Nullen eingetragen werden. Die erste TSL fur die ersten 122 
Daten-Sektoren sowie der erste eigentliche Daten-Sektor seien nachstehend auszugs- 
weise gelistet: 

Track $13, Sektor $0F: Erster TSL-Sektor 


00 

15 

OF 

00 

00 

00 

00 

00 

T. $15, S. $0F nachste TSL 

00 

00 

00 

00 

13 

0E 

T2 

S2 

T. $13, S. $0E erster Daten-Sektor 

T3 

S3 

T4 

S4 

13 

0D 

T2 

S2 

T. $12, S. $0D zweiter Daten-Sektor 

T3 

S3 

T4 

S4 

13 

OC 

T2 

S2 

usw. 

T3 

S3 

T4 

S4 

13 

0B 

T2 

S2 


T3 

S3 

T4 

S4 

13 

0A 

00 

00 

So sieht die TSL tatsachlich aus. 

00 

00 

00 

00 

13 

09 

00 

00 


00 

00 

00 

00 

13 

08 

00 

00 

usw. 

Track $13, 

Sektor $0E: Erster Daten-Sektor 


B1 

B0 

B0 

B0 

8D 

00 

00 

00 

1000 + Return 

00 

00 

00 

00 

00 

00 

00 

00 

usw. 


Der erste Daten-Sektor ist aus der ersten TSL in der zweiten Zeile des Hex-Dumps 
durch 13 0E (= Track $13, Sektor $0E) erkenntlich. Danach stehen auf der Diskette 
6 Nullen, die hier als T2 S2, T3 S3, T4 S4 kenntlich gemacht wurden. Gemeint ist da- 
mit, daB mit den Nullen die zweiten/dritten/vierten Daten-Tracks/Sektoren vorlau- 
fig in der TSL reserviert, jedoch noch nicht in der VTOC als belegt markiert wurden. 
Der Random-File benotigt damit zunachst nur 401 reine Daten-Sektoren sowie zu- 
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satzlich mehrere TSL-Sektoren, die jedoch insgesamt auf die Datendiskette passen. 
Wollte man nun jedoch die 401 bereits angelegten Records vollstandig beschreiben, 
d.h. jeweils bis zum 1024. Byte, dann wurde bereits nach weniger als 100 Records die 
Fehlermeldung ,,DISK FULL" angezeigt. 

Aus dem Beispiel kann man lemen, dafi die Anlage dynamischer Random-Files, bei 
denen die Inhalte der Records und/oder die Anzahl der Records selbst kontinuierlich 
wachst, unter DOS nicht empfehlenswert ist. 


2.6.9. APPEND, POSITION, BYTE 

Diese DOS-Befehle werden selten benutzt, zumal insbesondere APPEND und PO- 
SITION zeitintensiv sind, d.h. unter Umstanden beim normalen DOS 3.3 mehrere 
Minuten dauern konnen. 

APPEND bewirkt das Anhangen (to append) eines speicherintemen Arrays an einen 
speicherextemen Textfile. Die Syntax ist APPEND — WRITE — PRINT. Ein vor- 
angehendes OPEN ist iiberflussig. Man beachte, daB APPEND defmitionsgemafi 
nur fur WRITE-Operationen gedacht. Beispiel: 

10 PRINT CHR$(4) „OPEN TEST" 

20 PRINT CHR$(4) „WRITE TEST" 

30 FOR X = 0 TO 99 : PRINT X : NEXT 
40 PRINT CHR$(4) „CLOSE“ 

50 REM JETZT FOLGT APPEND-BEFEHL 
60 PRINT CHR$(4) „ APPEND TEST" 

70 PRINT CHR$(4) „ WRITE TEST" 

80 FOR X = 100 TO 199 : PRINT X : NEXT 
90 PRINT CHR$(4) „CLOSE“ 

Die Felder eines Textfiles werden vom DOS bei bestimmten Befehlen wie numeriert 
behandelt, wobei die Numerierung mit Null beginnt (0, 1, 2, 3...). Symbolisch laBt 
sich dies so darstellen: 

F0...rFl...rF2...rF3...rF4...rF5...rFn... Ctrl-0 
-Z- 
aP2 
rPO 
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d.h. Feld 0, gefolgt von Return, Feld 1, gefolgt von Return usw. bis zum Feld n, ge- 
folgt von Return. Ein Feld besteht in der Regel aus l...n Zeichen + Return, doch 
wird als Grenzfall vom DOS auch das nackte Return ohne vorangehende Zeichen als 
Feld aufgefaflt. Wenn ein File gerade geoffnet wurde, ist der Positionszeiger auf Feld 
0 gerichtet. Nach dem ersten PRINT oder INPUT richtet sich der Zeiger auf Feld 1 
usw. Jedes eingelesene Oder gespeicherte Return erhoht also den Positionszeiger. 
Beim APPEND wird (bei DOS 3.3) der File solange eingelesen, bis kein Return mehr 
folgt, also der Endmarker Ctrl-0 erreicht wurde. Dann wird ab dieser Stelle der Ar- 
ray gespeichert. Bei diesem Verfahren ist es nicht verwunderlich, daB der APPEND- 
Befehl so lange dauert. (Diversi-DOS ist hier etwas ,,schlauer“, da es gleich aufgrund 
der TSL zum letzten Datensektor geht, wodurch der APPEND-Befehl dann nur 
einen Bruchteil der Zeit in Anspruch nimmt.) 

Man muJ3 unterscheiden zwischen der relativen und der absoluten Feldposition. 
Wenn der Positionszeiger auf Feld 0 gerichtet ist, fallen absolute und relative Feldpo- 
sition zusammen. Wenn der Zeiger (Z) jedoch z.B. nach 2 INPUTs von Feld 0 und 1 
auf Feld 2 gerichtet wird, befindet man sich aus der Sicht von Feld 0 in der (absolu- 
ten) Position 2 (aP2) und aus der Sicht von Feld 2 in der relativen Position 0 (rPO); 
siehe obiges Schaubild. 

Der R-Parameter bei Random-Files bezieht sich auf die absolute Position eines Re- 
cords, der sich aus einem ODER mehreren, durch Returns getrennten Feldern zu- 
sammensetzen kann. Bei sequentiellen Files ist der R-Parameter ebenfalls moglich, 
doch bezieht er sich nunmehr auf die relative Feldposition, d.h. auf dasjenige Feld, 
dafi dem r-ten Return vorausgeht. Nur direkt nach dem OPEN-Befehl ist die relative 
mit der absoluten Feldposition identisch. Beispiel: 

10 PRINT CHR$(4) „OPEN TEST" : REM ZEIGER DANACH AUF F0 
20 PRINT CHR$(4) „ WRITE TEST" 

30 PRINT 0 : REM ZEIGER DANACH AUF FI 

40 PRINT 1 : REM ZEIGER DANACH AUF F2 

50 PRINT 2 : REM ZEIGER DANACH AUF F3 

60 PRINT 3 : REM ZEIGER DANACH AUF F4 

70 PRINT 4 : REM ZEIGER DANACH AUF F5 

80 PRINT CHR$(4) „CLOSE“ 

90 REM JETZT FOLGT EIGENTLICHER TEST 
100 PRINT CHR$(4) „OPEN TEST" : REM ZEIGER DANACH AUF F0 
110 PRINT CHR$(4) „POSlTION TEST.Rl" : REM RELATIV = ABSOLUT! 
120 PRINT CHR$(4) „READ TEST" 

130 INPUT R : PRINT R : REM FELD 1, WEIL 0+1 = 1! 
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140 PRINT CHR$(4) ..POSITION TEST.R4" : REM RELATIV! 

150 PRINT CHR$(4) „READ TEST" 

160 INPUT R : PRINT R : REM FELD 5, WEIL 1 +4 = 5! 

170 PRINT CHR$(4) , .CLOSE" 

R0 ist das momentane Feld, R1 das nachste, R2 das ubernachste usw. Aus der Sicht 
von z.B. dem absoluten Feld FI ist R4 das (1 + 4 = ) 5. Feld. Nach OPEN- 
POSITION-WRITE bzw. OPEN-POSITION-READ gilt: absolut gleich relativ. 
Spater nach POSITION-WRITE bzw. POSITION-READ gilt: absolut ungleich re- 
lativ. Das nachfolgende Demo-Programm fafit die neuen Befehle zusammen: 

100 REM = = = APPEND-POSITION-TEST = = = 

105 REM — MERGE. FILE DRIVE 1 — 

110 PRINT CHR$ (4) „OPEN MERGE. FILE, Dl“ 

120 PRINT CHR$ (4) ..DELETE MERGE. FILE" 

130 PRINT CHR$ (4) „OPEN MERGE. FILE" 

140 PRINT CHR$ (4) „ WRITE MERGE. FILE" 

150 Z = 0 : PRINT ,,00000“ : REM FORMATIERTER FELDZAHLER 
160 PRINT CHR$ (4) „CLOSE MERGE. FILE" 

165 REM — EINZELFILE.l DRIVE 2 — 

170 PRINT CHR$ (4) „OPEN EINZELFILE.l, D2“ 

180 PRINT CHR$ (4) ..DELETE EINZELFILE.l" 

190 PRINT CHR$ (4) „OPEN EINZELFILE.l" 

200 PRINT CHR$ (4) „ WRITE EINZELFILE.l" 

210 FOR X = 0 TO 500 

220 PRINT STR$ (X) + „ AAAAAAAAAAAAAAAAAAAA" 

230 NEXT X 

240 PRINT CHR$ (4) , .CLOSE EINZELFILE. 1 ‘ ‘ 

245 REM — EINZELFILE. 2 DRIVE 2 — 

250 PRINT CHR$ (4) „OPEN EINZELFILE. 2, D2“ 

260 PRINT CHR$ (4) ..DELETE EINZELFILE. 2“ 

270 PRINT CHR$ (4) „OPEN EINZELFILE. 2“ 

280 PRINT CHR$ (4) ..WRITE EINZELFILE. 2“ 

290 FOR X = 0 TO 500 

300 PRINT STR$ (X) + „ BBBBBBBBBBBBBBBBBBBB" 

310 NEXT X 

320 PRINT CHR$ (4) „CLOSE EINZELFILE. 2“ 

330 HOME 

340 PRINT ,,EINGABE M = RUCKKEHR ZU MENU" : POKE 34, 2 
350 REM MENU 
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360 HOME :B$ = „1 = EINZELFILE.l = 2 = EINZELFILE.2 “ 
370 PRINT „1 ABSOLUTE POSITION 1 * 

380 PRINT „2 RELATIVE POSITION** 

390 PRINT „3 APPEND** 

400 PRINT : INPUT „“;K$ 

410 HOME: ON VAL (K$) GOTO 420, 550, 670 : GOTO 360 

415 REM ABSOLUT 

420 INPUT „WELCHE ABSOLUTE POSITION “;A$ 

430 IF A$ = „M“ GOTO 360 
440 PRINT B$;: INPUT „“;Y$ 

450 IF Y$ = „1“ THEN Y$ = „EINZELFILE.1“: GOTO 470 
460 Y$ = „EINZELFILE-2“ 

470 A = VAL (A$) 

480 PRINT CHR$ (4) „OPEN“ Y$ ,„D2“ : ZEIGER AUF NULL 
490 PRINT CHR$ (4) „POSITION“ Y$ „,R“A 
500 PRINT CHR$ (4) „READ“ Y$ 

510 INPUT X$ 

520 PRINT CHR$ (4) „CLOSE“ Y$ 

530 PRINT X$ 

540 GOTO 420 

545 REM RELATIV 

550 INPUT „WELCHE RELATIVE POSITION? “;A$ 

560 IF A$ = „M“ GOTO 360 
570 A = VAL (A$) 

580 PRINT B$;: INPUT „“;Y$ 

590 IF Y$ = „1“ THEN Y$ = „EINZELFILE.1“: GOTO 610 
600 Y$ = „EINZELFILE-2“ 

610 PRINT CHRS (4) „POSITION“ Y$ ,„R“A : ZEIGER RELATIV! 
620 PRINT CHRS (4) „READ“ Y$ 

630 INPUT X$ 

640 PRINT CHRS (4) 

650 PRINT X$ 

660 GOTO 550 

665 REM — APPEND - — 

670 PRINT CHRS (4) „ APPEND MERGE. FILE, Dl“ 

680 PRINT CHRS (4) „WRITE MERGE. FILE “ 

690 PRINT X$ 

700 PRINT CHRS (4) „CLOSE MERGE. FILE “ 

710 PRINT CHRS (4) „OPEN MERGE. FILE, Dl“ 

720 PRINT CHRS (4) „WRITE MERGE. FILE** 
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730 Z = Z + 1: PRINT LEFTS ( ,,00000“, 5 - LEN ( STR$ ( Z ) ) ) ; Z 
740 PRINT CHRS (4) „CLOSE MERGE. FILE** 

750 PRINT CHRS (4) „CATALOG,D2“ : REM ERSETZT POKE -21912, 2 
760 GOTO 360 

Verfolgt man den obigen ProgrammfluB, so stellt man fest, daB die Zeile 610 auch 
dann durchlaufen werden kann, wenn einer der beiden Einzelfiles durch Zeile 480 
nicht zuvor geoffnet wurde, d.h. der POSITION-Befehl ist auch ohne vorangehen- 
den OPEN-Befehl zulassig, setzt jedoch dann den Zeiger auf Null, als ob OPEN vor- 
angegangen ware. 

Der BYTE-Befehl spezifiziert bei sequentiellen Dateien die absolute bytemaflige Stel- 
le in einem File. Nehmen wir an, ein Brief umfasse 2.001 Zeichen (0-2000). Dann 
wurde das Programm 

10 PRINT CHR$(4) „OPEN BRIEF** 

20 PRINT CHR$(4) „READ BRIEF, B1000“ 

30 FOR X = 1000 TO 2000 

40 GET X$ : PRINT CHR$(4); : PRINT X$; NEXT X 
50 PRINT : PRINT CHR$(4) „CLOSE“ 

die zweite Halfte des Briefes einlesen und am Bildschirm anzeigen. Im Gegensatz zu 
dem R-Parameter beim POSITION-Befehl, der sich immer nur auf NACHFOL- 
GENDE Felder richten kann, kann der B-Parameter bei sequentiellen Textfiles ahn- 
lich wie der R-Parameter bei Random-Files ,,vorwarts und riickwarts** angewandt 
werden, d.h. mit dem BYTE-Befehl konnte man z.B. eine Datei riickwarts einlesen 
(was natiirlich nicht besonders sinnvoll ware): 

10 PRINT CHR$(4) „OPEN ALPHABET** 

20 PRINT CHR$(4) „ WRITE ALPHABET** 

30 FOR X = 65 TO 91 : PRINT CHR$(X); : NEXT : REM A BIS Z 
40 PRINT : PRINT CHR$(4) „CLOSE“ 

50 PRINT CHR$(4) „OPEN ALPHABET** 

60 FOR X = 25 TO 0 : REM Z BIS A 
70 PRINT CHR$(4) „READ ALPHABET, B“,X 
80 GET X$ : PRINT CHR$(4);: PRINT X$ : NEXT X 
90 PRINT CHR$(4);: PRINT : PRINT CHRS(4) „CLOSE“ 

Man beachte, daB man bei beiden Programmen wegen des GET-Befehls, der das Re- 
turn unterdriickt, eine permanente CHR$(4)-DOS-Umschaltung vornehmen muB. 
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Da der BYTE-Befehl nicht nach Feldern, sondern nach absoluten Diskettenspeicher- 
stellen vorgeht und insofern Returns wie jedes andere Zeichen behandelt, ist die An- 
wendung dieses Befehls normalerweise nur bei Dateien mit exakt bekannter Struktur 
sinnvoll. 

Abschlieflend sei erwahnt, dafl der POSITION- bzw. BYTE-Befehl R- bzw. B- 
Parameter im Bereich 0-32767 zulaBt. 


2.6.10. EXEC (Executive Textfile) 

EXEC ist die Abkiirzung fur execution (Befehlsausfiihrung) bzw. executive textfile 
(Befehlsdatei). Darunter ist ein sequentieller Textfile zu verstehen, der aus Direktbe- 
fehlen besteht, die man normalerweise manuell liber die Tastatur eingeben wtirde, 
die jedoch durch Starten des Execfiles automatisch ausgefiihrt werden. Execfiles er- 
st ellt man am besten mit einem Textverarbeitungsprogramm, das Textfiles erzeugt, 
beispielsweise mit dem Applewriter lie, Oder ersatzweise mit einem Applesoft- 
Programm. Da bei aktiven Execfiles Tastatureingaben verboten sind — diese wiir- 
den namlich als Execbefehle interpretiert — und ferner nicht jeder DOS- oder 
Applesoft-Befehl Bestandteil eines Execfiles sein darf, ist die Nutzanwendung dieses 
File-Typs auf wenige Spezialfalle begrenzt. Vereinfachtes Beispiel: 

10 PRINT CHR$(4) „OPEN EXECUTIVE 1 * 

20 PRINT CHR$(4) „ WRITE EXECUTIVE** 

30 PRINT ,,RUN PROGRAMM 1“ 

40 PRINT „RUN PROGRAMM 2“ 

50 PRINT CHR$(4) „CLOSE“ 

Danach wiirde der manuell iiber die Tastatur eingegebene Befehl 

EXEC EXECUTIVE 

zunachst das Programm 1 und — nach Beendigung desselben — automatisch das 
Programm 2 starten. 
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FIND die Ermittlung der Startadresse und Lange eines zuvor geBLOADeten Binars- 
files in dezimal und hexadezimal. Die diversen Pokes dienen der Hexadezimalum- 
rechnung. Das „?“ steht fur PRINT. 

POKE 47097, PEEK (43634) + PEEK (43616) - INT ( ( PEEK (43634) + PEEK 
(43616) ) / 256) • 256: POKE 47098, PEEK (43635) + PEEK (43617) + ( ( PEEK 
(43634) + PEEK (43616) ) > 255) 

HOME : ?,,BLOAD-FINDER - LETZTER BLOAD:“ 

?„DEZ.“: ?„ANF: PEEK (43634) + 256 ■ PEEK (43635): ?,,LEN: PEEK 
(43616) + 256 ■ PEEK (43617): ?„END: PEEK (47097) * 256 • PEEK 
(47098) 

?„HEX.“: ?„ANF: $“;: POKE 70, PEEK (43634): POKE 71, PEEK (43635): PO- 
KE 58, 64: POKE 59, 249: CALL 65209: ?: ?,,LEN: $“;: POKE 70, PEEK (43616): 
POKE 71, PEEK (43617): CALL 65209: ?: ?„END: $“;: POKE 70, PEEK (47097): 
POKE 71, PEEK (47098): CALL 65209 

?: ?„ NAME EINFUGEN**: ?: ?„ BSAVE ,A“; PEEK (43634) + 256 • 

PEEK (43635); ,„L“; PEEK (43616) + 256 • PEEK (43617): HTAB 1: VTAB 17 


2.6.10.2. List-Maker 

Dieser Execfile - zu starten mit z.B. EXEC LIST. MAKER — speichert das sich ge- 
rade im RAM befindliche Applesoft-Programm unter dem Namen LIST auf der 
Diskette als Textfile (!), der z.B. dann mit dem Applewriter bearbeitet und spater 
wieder mit EXEC LIST in ein normales (binares) Applesoft-Programm zuruckver- 
wandelt werden kann. Die Pokes dienen u.a. der Tastatureingabe, da der GET- 
Befehl nicht moglich ware. 

POKE 768, 44: POKE 769, 16: POKE 770, 192: POKE 771, 173: POKE 772, 0:PO- 
KE 773, 192: POKE 774, 16: POKE 775, 251: POKE 776, 44: POKE 777, 16: POKE 
778, 192: POKE 779, 96 

63999 POKE 51, 128: POKE 33, 33: ?: ?CHR$(4) „OPENLIST“: ?CHR$(4) ,,DE- 
LETELIST**: ?CHR$(4) „OPENLIST“: ?CHR$(4) „WRITELIST“: LIST - 
63998: ?CHR$(4) „CLOSELIST“: TEXT: RETURN 

HOME: INVERSE: ?„LIST.MAKER“: NORMAL: ?: ?„INSERT DATA DISK 
AND PRESS RETURN**: CALL 768: GOSUB 63999: DEL 63999, 63999 


2.6.10.1. Bload-Finder 

Dieser Execfile, der z.B. mit dem Applewriter auf einer Diskette unter dem Namen 
BLOADFIND gespeichert sein mag, bewirkt durch den Befehl EXEC BLOAD- 



69 


TEIL II: DOS fur Assembler- 
Programmierer 


In diesem Teil II werden technische Details der Datenspeicherung, diverse Tips und 
Tricks (auch fur Applesoft-Programmierer) sowie insbesondere der Direktzugriff 
auf einzelne Diskettensektoren auf Maschinenebene behandelt. Da die Assembler- 
programmierung nicht jedermanns Sache ist, enthalt dieser Teil eine Vielzahl aus- 
fiihrlich kommentierter Komplettprogramme als Quell-Code, so dab der Leser die 
Programme oder Programmteile problemlos in seine eigenen Programme integrieren 
kann. Als Assembler wurde der „Big Mac“ bzw. „Merlin“ verwendet. Auf seltene 
Pseudo-Opcodes und Macros wurde bewuflt in den Assemblerprogrammen verzich- 
tet, damit eine Abanderung des jeweiligen Source-Codes fur andere Assembler (z.B. 
LISA, S-C- Assembler usw.) sich problemlos gestaltet. 



Hinweis: 


Die Seiten 70 bis 185 wurden aus Platzgriinden nicht gescannt. 
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6. RWTS (Read- Write-Track-Sector) 


6.2.10. File-Reader 


100 REM *** FILE-READER *** 

ilO PRINT CHR$ (21): IF PEEK (36864) = 76 AND PEEK (36B65) = 
26 AND PEEK (36B66) = 144 THEN 140 
120 PRINT : PRINT CHR$ (4) "MAXFILES 3": CLEAR : HIMEM: 4076 
130 PRINT : PRINT CHR$ (4) "BLOAD FILE-READER. OBJ " 

140 TEXT : HOME : INVERSE : PRINT "* FILE-READER PRINT "* 

U. STIEHL/B3 *": NORMAL I PRINT : PRINT "START J/N " 

150 BET XT: ON X* = "J" 60TD 160: ON X* < > "N" GOTO 150: 

PRINT : END 

160 HOME : INVERSE : PRINT "DISKETTE EINLEGEN": NORMAL : PRINT 
: PRINT "W = WEITER 
170 SET X*: IF X* < > ”W" THEN 170 

ISO HOME : PRINT : PRINT CHR$ (4) "CATALOG" : INPUT "DATEI:";X$: 
IF X* = "" GOTO 140 

170 HOME : INVERSE : PRINT "ESC=ENDE * SPACE=STOPP" : NORMAL : 
PRINT 

200 PRINT CHR$ (4 > "UNLOCK" ; X$ 

210 PR# O: IN# O: CALL 36864: REM $7000 

220 CALL 1002: PRINT : PRINT " 1=ERNEUT * 0=ENDE “ ; 

230 GET X$: ON X$ = "l" GOTO 140: IF X* < > "0" THEN 230 


: ASM 


1 

4 

¥■ 

* 

ORG 

JMP 

36864 

INITIAL 

; #9000 

5 





6 

# 




7 

IND1 

EGU 

$C£ 

; $CF 

a 

IND2 

EQU 

$FE 

?$FF 

7 

TEXT 

EQU 

$FB2F 


10 

HOME 

EQIJ 

$FC.58 


11 

FRINT 

EQU 

TFDED 


12 

HEX OUT 

EQU 

TFDDA 


13 

* 




14 

* MAX. 5 

TSL 

= 5* 1 22*2= 

1220=$4C4 

15 

tOTALTSL 

EQU 

$8B00 

; — $8FC4 

16 

* 




17 

*MACROPUFFER 

= 122 SEKTOREN 

18 

-* 




17 

MACPUFF 

EOU 

$1000 

5 — $8A00 

20 

* 




21 

* MAXFILES MUSS 3 3EIN 


22 

* 




23 

TSLPUFF 

EQU 

$7700 

: ANFANG 

24 

TSLPTR 

EQU 

$7701 

; POINTER 

25 

TSL 

EQU 

$770C 

; EIB. TSL 

26 

RWTS 

EQU 

$3D7 


27 

RWTSLOCO 

EQU 

$3E3 
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28 

DO SWARM 

EQU 

$3DG 





29 

* 







30 

* 

108- 

BLOCK 





31 

* 



9003 

01 



3° 

IQB 

HEX 

01 : IMMER 

7004 

60 



33 

SLOT 

HEX 

60 

9005 

01 



34 

DRIVE 

HEX 

01 

7006 

00 



35 

VOLUME 

HEX 

00 

9007 

00 



36 

TRACK 

HEX 

00 

9008 

00 



37 

SECTOR 

HEX 

00 

9009 

14 



38 

DCTLOW 

DFB 

#< DCT 

7 00 A 

90 



39 

DCTHIGH 

DFB 

#>DCT 

9.00B 

00 



40 

BUFLOW 

HEX 

00 

900C 

00 



41 

BUFHIGH 

HEX 

00 

700D 

00 



42 


HEX 

00 ; UNUSED 

900E 

00 



43 


HEX 

00 ; COUNT ! 0 

900F 

01 



44 

COMMAND 

HEX 

01 sREAD 

7010 

00 



45 

DOSERROR 

HEX 

00 

9011 

00 



46 

EFFVOL 

HEX 

00 

7012 

60 



47 

VORSLQT 

HEX 

60 

9013 

01 



48 

VORDRIVE 

HEX 

01 





49 

* 







50 

* 

DCT 






51 

* 



7014 

00 

01 

EF 

52 

DCT 

HEX 

0001EFD8 ; IMMER 

9017 

D8 











53 

* 



7018 

00 



54 

YSAVER 

HEX 

00 

7017 

00 



55 

XSAVER 

HEX 

00 





56 

* 







57 

* ACTIVE 

SLOT 

+ DRIVE ERMITTELN 





58 

* 



901 A 

20 

E3 

03 

59 

INITIAL 

JSR 

RWTSLOCO 

901D 

84 

CE 


60 


STY 

IND1 ; LOW I OB 

90 IF 

85 

CF 


61 


STA 

IND1+1 ; HIGH I OB 

7021 

AO 

01 


62 


LDY 

#1 

7023 

B1 

CE 


63 


LDA 

(IND1) , Y 

7025 

8D 

04 

90 

64 


STA 

SLOT 

7028 

C8 



65 


INY 


9029 

B1 

CE 


66 


LDA 

(IND1) , Y 

902B 

8D 

05 

90 

67 


STA 

DRIVE 

902E 

2C 

10 

CO 

68 


BIT 

SCO 10 





69 

* 







70 

* TOTAL— 

TSL INITIALISIEREN 





71 

* 



7031 

A9 

00 


72 


LDA 

#< TOTALTSL 

7033 

85 

CE 


73 


STA 

IND1 

7035 

A7 

BB 


74 


LDA 

#>TQTALTSL 

7037 

85 

CF 


75 


STA 

IND1+1 

9039 

A9 

00 


76 


LDA 

#< TSLPUFF 

703B 

8D 

OB 

90 

77 


STA 

BUFLOW 

703E 

A9 

97 


78 


LDA 

#>TSLPUFF 

9040 

8D 

OC 

90 

79 


STA 

BUFHIGH 

9043 

4C 

5D 

90 

80 


JMP 

SST0RE1 ; ERSTE 
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9046: AD 

01 

97 

81 

NEXTTSL 

LDA 

TSLPTR 

9049: FO 

29 


82 


BEG! 

SST0RE4 

904 B: BD 

07 

90 

83 


STA 

TRACK 

904E : AD 

02 

97 

84 


LDA 

TSLPTR+l 

9051: 8D 

08 

90 

85 


STA 

SECTOR 

9054: A9 

90 


86 


LDA 

#>IOB 

9056: AO 

03 


87 


LDY 

#< 10B 

9058: 20 

D9 

03 

88 


JSR 

RWTS 

905B: BO 

1A 


89 


BCS 

ERROR 1 

905D: A2 

00 


90 

SST0RE1 

LDX 

#*00 

905F: AO 

00 


91 


LDY 

#*00 

9061: BD 

oc 

97 

92 

SST0RE2 

LDA 

TSL . X 

9064: 91 

CE 


93 


STA 

<:r.Nt>i5 , y 

9066: E6 

CE 


94 


INC 

IND1 

9068: DO 

02 


95 


BNE 

SST0RE3 

906 A: E6 

CF 


96 


INC 

IIMD1+-1 

906C: E8 



97 

SST0RE3 

I NX 


906 D: EO 

F4 


98 


CPX 

#244 

906F: DO 

FO 


99 


BNE 

SST0RE2 

9071: 4C 

46 

90 

100 


JMP 

NEXTTSL 

9074: 4C 

E5 

90 

101 

SST0RE4 

JMP 

BATCHO 




102 

* 






103 

* LEBEFEHLER 





104 

* 



9077: 20 

2F 

FB 

105 

ERROR 1 

JSR 

TEXT 

907 A: 20 

58 

FC 

106 


JSR 

HOME 

90 7D: AD 

10 

90 

107 


LDA 

DOSERRQR 

9080: 20 

DA 

FD 

108 


JSR 

HEX OUT 

9083: 4C 

DO 

03 

109 


JMP 

DOSWARM 




110 

* 






111 

* LOESCHEN *1000-*8AFF 




1 12 

* 



9086: A9 

00 


113 

CLEARO 

LDA 

#<MACPUFF 

9088: 85 

FE 


114 


STA 

IND2 

908A: A9 

10 


115 


LDA 

#>MACPUFF 

908C: * 85 

FF 


116 


STA 

IND2+1 

908E: A9 

00 


117 


LDA 

#0 

9090: A8 



118 


TAY 


9091: 91 

FE 


119 

CLEAR 1 

STA 

< I ND2 ) , Y 

9093: C8 



120 


INY 


9094: DO 

FB 


121 


BNE 

CLEAR 1 

9096: E6 

FF 


122 


INC 

IND2+1 

9098: A6 

FF 


123 


LDX 

IND2+1 

909A: EO 

8B 


124 


CPX 

#>TOTALTSL 

909C: DO 

F3 


125 


BNE 

CLEAR 1 

909E: 60 



126 


RTS 





127 

* 






128 

* PRINT 

122 SEKTDREN 




129 

* 



909F : A9 

00 


130 

PR INTO 

LDA 

#0 

90 A 1 : 85 

FE 


131 


STA 

IND2 

90A3: A9 

10 


132 


LDA 

#>MACF'UFF 

90A5 : 85 

FF 


133 


STA 

IND2+1 

90A7: AO 

00 


134 


LDY 

#0 

90 A9: B1 

FE 


135 

PRINT1 

LDA 

( IND2) , Y 


jLETZTE 


; 122*2 
; MAX. 
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90AB: 

09 

80 


136 


ORA 

#*ao 

90AD: 

C9 

8D 


137 


CMP 

#*aD 

90AF : 

FO 

07 


138 


BEQ 

PRINT2 

90B1: 

C9 

AO 


139 


CMP 

#*AO 

90B3 : 

BO 

03 


140 


BCS 

PRINT2 

90B5: 

38 



141 


SEC 


90B6: 

E9 

80 


142 


SBC 

#*80 

90B8: 

20 

ED 

FD 

143 

PRINT2 

JSR 

PRINT 

90BB : 

AD 

00 

CO 

144 


LDA 

*COOO 

90BE: 

10 

13 


145 


BF'L 

PRINT.3 ; NO KEY 

90C0: 

2C 

10 

CO 

146 


BIT 

*C010 

90C3 : 

C9 

9B 


147 


CMP 

#*9B ; ESC 

90C5: 

FO 

IB 


148 


BEG 

PRINT4 

90C7 : 

C9 

AO 


149 


CMP 

#*A0 ; SPACE 

90C9: 

DO 

08 


150 


BNE 

PRINT3 

90CB: 

AD 

00 

CO 

151 

WAIT 

LDA 

*C000 

90CE : 

10 

FB 


152 


BPL 

WAIT 

90D0 : 

2C 

10 

CO 

153 


BIT 

*CQ10 

90D3: 

C8 



154 

PRINTS 

INV 


90D4 : 

DO 

D3 


155 


BNE 

PR INTI 

90D6: 

E6 

FF 
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INC 

IND2+1 

90D8 : 

A5 

FF 


157 


LDA 

IND2+1 

90DA: 

CD 

OC 

90 

158 


CMP 

BUFHIBH 

90DD: 

90 

CA 


159 


BCC 

PR INTI 

90DF : 

FO 

C8 


160 


BEQ 

PR INTI 

90E1: 

60 



161 


RTS 

; RETURN 

90E2: 

68 



162 

PRINT4 

FLA 


90E3: 

68 



163 


PLA 


90E4: 

60 



164 


RTS 

; ENDE 
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* 







166 

* 122 SEKTDREN BATCH LESEN 





167 

* 



90E5 : 

AO 

00 


168 

BATCHO 

LDY 

#0 

90E7 : 

BC 

18 

90 

169 


STY 

YSAVER 

90EA: 

A9 

00 


170 


LDA 

#<TOTALTSL 

90EC : 

85 

CE 


171 


STA 

IND1 

90EE: 

A9 

SB 


172 


LDA 

#>TOTALTSL 

90F0: 

85 

CF 


173 


STA 

IND1+1 





174 








175 

* AUSSERER LOOP 





176 

* 



90F2: 

AC 

18 

90 

177 

BATCH 1 

LDY 

YSAVER 

90F5: 

B 1 

CE 


178 


LDA 

( IND1 > , Y 

90F7: 

DO 

05 


179 


BNE 

BATCH2 

90F9: 

A9 

00 


180 


LDA 

#0 

90FB: 

85 

48 


181 


STA 

*48 : P-REG 

90FD: 

60 



182 


RTS 

; ENDE 





183 

* 







184 

* READ 

A BATCH 





185 

* 



90FE: 

A2 

00 


186 

BATCH2 

LDX 

#0 

9100: 

BD 

19 

90 

187 


STA 

XSAVER 

9103: 

A9 

00 


IBB 


LDA 

#<MACPUFF 

9105: 

8D 

OB 

90 

189 


STA 

BUFLOW 

9108: 

A9 

10 


190 


LDA 

#>MACPUFF 


190 


6. RWTS (Read- Write-Track-Sector) 


9 1 OA : 

8D 

oc 

90 

191 

910D: 

CE 

oc 

90 

192 

9110; 

20 

86 

90 

193 





194 





195 





196 

9113: 

AC 

18 

90 

197 

9116: 

B1 

CE 


198 

9119: 

FO 

35 


199 

911A: 

EE 

OC 

90 

200 

91 ID: 

BD 

07 

90 

201 

9120: 

EE 

18 

90 

202 

9123: 

AC 

18 

90 

203 

9126: 

DO 

02 


204 

9128: 

E6 

CF 


205 

912A: 

B 1 

CE 


206 

912C: 

8D 

08 

90 

207 

912F: 

A9 

90 


208 

9131: 

AO 

03 


209 

9133: 

20 

D9 

03 

210 

9136: 

90 

01 


211 

9138: 

EA 



212 

9139: 

EE 

18 

90 

213 

913C: 

AC 

18 

90 

214 

913F: 

DO 

02 


215 

9141 : 

E6 

CF 


216 

9143: 

AE 

19 

90 

217 

9146: 

EB 



218 

9147: 

E8 



219 

9148: 

BE 

19 

90 

220 

914B: 

EO 

F4 


221 

914D : 

90 

C4 


222 

914F: 

A9 

00 


223 

9131: 

85 

48 


224 

9153: 

20 

9F 

90 

225 

9156: 

4C 

F2 

90 

226 


ST A BUFHIGH 
DEC BUFHIGH 
J SR CLEARO 


* INNERER LOOP 

* 


BATCH3 

LDY 

YSAVER 


LDA 

(INDl) , Y 


BEQ 

BATCH7 


INC 

BUFHIGH 


STA 

TRACK 


INC 

YSAVER 


LDY 

YSAVER 


BNE 

BATCH4 


INC 

I ND 1+1 

BATCH4 

LDA 

( IND1 ) , Y 


STA 

SECTOR 


LDA 

#>IQB 


LDY 

#< I OB 


JSR 

RWTS 


BCC 

NOP 

BATCH5 

BATCH5 

INC 

YSAVER 


LDY 

YSAVER 


BNE 

BATCH6 


INC 

IND1+1 

BATCH6 

LDX 

INX 

INX 

XSAVER 


STX 

XSAVER 


CF'X 

#244 


BCC 

BATCH3 

BATCH7 

LDA 

#0 


STA 

*48 


JSR 

PR INTO 


JMP 

BATCH1 


— End assembly — 
345 bytes 


Errors: 0 


; ERROR 1 


i P-REG 


6.2. 1 1 . FASTBRUN-Routine (Apple II Plus Emulator fur lie) 

6.2.11. FASTBRUN-Routine (Apple II Plus Emulator fur Re) 


: ASH 


□RG *0D04 


6 

7 

8 
9 


FF'BASIC FUR APPLE IIE 


FPBASIC WIRD IN DIE APPLE IIE 
LC-KARTE GELADEN. SO DABS DER 
APPLESOFT- INTERPRETER MODIFI- 
ZIERT WERDEN KANN. 



10 

* 




11 

* 

Dieses Proqramm ist ein Bei-- 


1. 2 

* 

spiel -filr die Anwendunq der 


13 

* 

FASTBRUN-Routine. 


14 

* 

Wie wird's aemacht? 


1 5 

* 




16 

-* 

1. 

Dieses Drivei — Proqramm 


17 

* 


nach $0D04 BLDADen 


18 

* 

O 

FPBASIC von System-Master 


19 

* 


nach *1000 BLOADen 


20 

* 

3. 

BSAVE FP.NEU.A*0D04,L*32FB 


21 

* 

4. 

Hit 'Bag o-f Tricks' Oder 


oo 

JL. 

* 


einer anderen RWTS-Utility 


23 

* 


die ersten 4 Bytes des 


24 

* 


ersten Sektors FP.NEU 


25 

* 


von 04D0FB32 


26 

* 


in 04D0F000 andern. 


27 

* 


so daB der BRUN-Befehl nur 


28 

* 


noth den ersten Sektor 


29 

* 


einliest und der Rest von 


30 

* 


der Fastbrun-Routi ne besorgt 


31 

* 


wird. (FP.NEU =■■ 52 Sektoren) 


32 

* 




33 

* 




34 


F ASTBRUN-ROUT I NE 


35 

•* 




36 

* 




37 

* 

Oiese Routine setzt MAXFILES 3 


38 

* 

und 

DOS 3.3 in den unteren 48K 


39 

* 

voraus ! 


40 

* 



0D04: 4C ID OD 

41 



JMP PAR AMS 


42 

IND1 

EQU *CE : *CE— CF 


43 

IND2 

EDU *FE ; *FE-FF 


44 

TSL 

EQU *9700 : MXFLS 3 


45 

RWTS 

EQU *3D9 


46 

*INF'UT-OUTPUT-CONTROL-BLOCK***** 

0D07 : 01 

47 

IOB 

HEX 01 : STETS 

0D08 : 60 

48 

SLOT 

HEX 60 ; SLOT 6 

0D09: 01 

49 

DRIVE 

HEX 01 

ODOA : 00 

50 

VOLUME HEX 00 
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192 


ODOB: 00 



51 

TRACK 

HEX 

00 


ODOC: 00 



52 

SECTOR 

HEX 

00 


ODOD: 13 



53 

DCTLOW 

DFB 

#<DCT 


ODOE : OD 



54 

DCTHIGH 

DFB 

# >DCT 


ODOF: 00 



55 

BUFLOW 

HEX 

OO 


0D10: 00 



56 

BUFHIGH 

HEX 

00 

; STETS 0 

0D1 1 : 00 



57 


HEX 

00 

; UNUSED 

0D12: 00 



58 


HEX 

00 

: COUNT : 0 

0D13: 01 



59 

COMMAND 

HEX 

01 

; READ 

0D14: 00 



60 

DOSERROR 

HEX 

00 


OD 1 5 s 00 



61 

EFFVOL 

HEX 

00 


0D16: 60 



62 

VORSLOT 

HEX 

60 


0D17: 01 



63 

VORDRIVE 

HEX 

01 





64 

♦DEVICE— 

CHARACTERISTICS 

-TABLE*** 

0D18! 00 

01 

EF 

65 

DCT 

HEX 

0001EFD8 

; STETS 

OD 1 B : D8 








OD 1C: 00 



66 

TEMP 

HEX 

00 





67 

* 







68 

* SLOT/DRIVE/VOLUME 





69 

* 




0D1D: 20 

E3 

03 

70 

PARAMS 

JSR 

*3E3 

: IOB WO? 

0D20: 84 

CE 


71 


STY 

IND1 


0D22: 85 

CF 


72 


STA 

IND1+1 


0D24 : AO 

01 


73 


LDY 

#1 


0D26: 81 

CE 


74 


LDA 

( IND1 > , Y 

; IOB 

0D28 : 8D 

08 

OD 

75 


STA 

SLOT 


0D2B: 8D 

16 

OD 

76 


STA 

VORSLOT 


0D2E: C8 



77 


I NY 



0D2F : B1 

CE 


78 


LDA 

(IND1) . Y 


0D31: 8D 

09 

OD 

79 


STA 

DRIVE 


0D34: 8D 

17 

OD 

BO 


STA 

VORDRIVE 


0D37 : CS 



81 


I NY 



0D3S: B1 

CE 


82 


LDA 

< IND1 > , Y 


0D3A: 8D 

15 

OD 

S3 


STA 

EFFVOL 





84 

* 




0D3D: A9 

OD 


85 


LDA 

#*0D 

: 0E00-1P 




86 

# 







37 

* Dies© 

RUTS 

setzt das 

Einlesen 




88 

* mit dem 2. 

Sektor -fort. 




89 

* 




0D3F : 8D 

10 

OD 

90 


STA 

BUFHIGH 


0D42: A9 

00 


91 


LDA 

#*oo 


0D44: SD 

OF 

OD 

92 


STA 

BUFLOW 


0D47 : AO 

02 


93 


LDY 

#2 


0D49 : 8C 

1C 

OD 

94 


STY 

TEMP 

5.2. SEKT. 




95 

* 




0D4C: EE 

10 

OD 

96 

READER 1 

INC 

BUFHIGH 


0D4F: AC 

1C 

OD 

97 


LDY 

TEMP 


0D52: B9 

OC 

97 

98 


LDA 

TSL , Y 


0D55: FO 

26 


99 


BEQ 

READEND 


0D57: 8D 

OB 

OD 

100 


STA 

TRACK 


0D5A: C8 



101 


INY 



0D5B: B9 

OC 

97 

102 


LDA 

TSL, Y 


0D5E: 8D 

OC 

OD 

103 


STA 

SECTOR 



6.2.11. FASTBRUN-Routine (Apple II Plus Emulator fur lie) 
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0D61 

EE 

1C 

OD 

104 


INC 

TEMP 

0D64 

EE 

1C 

OD 

105 


INC 

TEMP 

0D67 

A9 

OD 


106 


LDA 

#>IOB 

0D69 

AO 

07 


107 


LDY 

IK IOB 

0D6B 

20 

D9 

03 

108 


JSR 

RWTS 

0D6E 

80 

03 


109 


ecs 

ERROR 

0D70 

4C 

4C 

OD 

110 


JMP 

READER 1 

0073 

A9 

00 


111 

ERROR LDA 

#0 

0D7S 

85 

48 


1 12 


STA 

*48 

0D77 

A9 

C5 


113 


LDA 

#"E" 

0D79 

8D 

OO 

04 

114 


STA 

#400 

0D7C 

60 



115 


RTS 


0D7D 

A 9 

00 


1 16 

READEND LDA 

#0 

0D7F 

85 

48 


117 


STA 

*48 ; F 





118 

* 







119 

* Ende der Fastbrun-Rautine 





1 20 

* 







121 

* 



0D81 

4C 

00 

OE 

122 


JMP 

*OEOO 





123 

-* 







124 

* AUF VOLLE PAGE AUFFuLLEN ! 





125 

* 



OD84: 

EA 

EA 

EA 

126 


HEX 

EAEAEAEAEA 

0D87 ; 

EA 

EA 






0D89: 

EA 

EA 

EA 

127 


HEX 

EAEAEAEAEA 

0D8C: 

EA 

EA 






ODBE: 

EA 

EA 

EA 

128 


HEX- 

EAEAEAEAEA 

0D9 1 : 

EA 

EA 






0D93: 

EA 

EA 

EA 

129 


HEX 

EAEAEAEAEA 

0D96 : 

EA 

EA 






0D98: 

EA 

EA 

EA 

130 


HEX 

EAEAEAEAEA 

0D9B: 

EA 

EA 






0D9D: 

EA 

EA 

EA 

131 


HEX 

EAEAEAEAEA 

ODAO: 

EA 

EA 






0DA2: 

EA 

EA 

EA 

132 


HEX 

EAEAEAEAEA 

0DA5: 

EA 

EA 






0DA7 : 

EA 

EA 

EA 

133 


HEX 

EAEAEAEAEA 

ODAA: 

EA 

EA 






ODAC: 

EA 

EA 

EA 

134 


HEX 

EAEAEAEAEA 

ODAF : 

EA 

EA 






ODB 1 : 

EA 

EA 

EA 

135 


HEX 

EAEAEAEAEA 

0DB4 : 

EA 

EA 






0DB6: 

EA 

EA 

EA 

136 


HEX 

EAEAEAEAEA 

0DB9 : 

EA 

EA 






ODBB: 

EA 

EA 

EA 

137 


HEX 

EAEAEAEAEA 

ODBE: 

EA 

EA 






ODCO : 

EA 

EA 

EA 

138 


HEX 

EAEAEAEAEA 

0DC3 : 

EA 

EA 






0DC5: 

EA 

EA 

EA 

139 


HEX 

EAEAEAEAEA 

0DC8: 

EA 

EA 






ODCA: 

EA 

EA 

EA 

140 


HEX 

EAEAEAEAEA 

ODCD: 

EA 

EA 






ODCF : 

EA 

EA 

EA 

141 


HEX 

EAEAEAEAEA 

0DD2: 

EA 

EA 







REG 
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6. RWTS (Read- Write-Track-Sector) 


0DD4 : EA 

EA 

EA 

142 


HEX 

EAEAEAEAEA 


0DD7 s EA 

EA 







QDD9: EA 

EA 

EA 

143 


HEX 

EAEAEAEAEA 


ODDC: EA 

EA 







ODDE: Efi 

EA 

EA 

144 


HEX 

EAEAEAEAEA 


ODE 1 : EA 

EA 







0DE3 : EA 

EA 

EA 

145 


HEX 

EAEAEAEAEA 


0DE6 : EA 

EA 







ODES: EA 

EA 

EA 

146 


HEX 

EAEAEAEAEA 


ODEB: EA 

EA 







ODED: EA 

EA 

EA 

147 


HEX 

EAEAEAEAEA 


ODFO : EA 

EA 







0DF2 : EA 

EA 

EA 

148 


HEX 

EAEAEAEAEA 


0DF5: EA 

EA 







0DF7 : EA 

EA 

EA 

149 


HEX 

EAEAEAEAEA 


DDF A: EA 

EA 







ODFC: EA 

EA 

EA 

150 


HEX 

EAEAEAEA 


ODFF: EA 



151 

* 







1 52 

* 







153 

* FF'BASIC + MONITOR APPLE 

II PLUS 




154 

* FOR APPLE IIE WITH 64K CARD 




155 

* 







156 

FPBASIC1 

EQU 

$1000 





157 

FPBASIC2 

EQU 

$DQOO 





158 

DOSWARM 

EQU 

$Q3D0 





159 

PRINT 

EQU 

$FDED 





160 

HOME 

EQU 

$FC58 





161 

* 







162 

* EXIT, 

IF BRUN FROM 64K CARD 




163 

* 




OEOO : AD 

13 

CO 

164 


LDA 

$C013 

AUXRAM? 

0E03: 10 

01 


165 


BF'L 

START 

NO! 

0E05: 60 



166 


RTS 






167 

* 







168 

* DISABLE 80-C0L-CARD 





169 

* 




0E06: A9 

95 


170 

START 

LDA 

#$95 

CTRL-U 

OEOS : 20 

ED 

FD 

171 


JSR 

PRINT 


OEOB : 20 

58 

FC 

172 


JSR 

HOME 





173 

* 







174 

* SET SOFT-SWITCHES 





175 

* 




OEOE : 8E 

OB 

CO 

176- 


STX 

$COOB 

C3SL0T 

0E1 1 : SE 

00 

CO 

177 


STX 

$COOO 

SO-OFF 

OE 1 4 : 8E 

OC 

CO 

178 


STX 

$cooc 

40— COL 

0E17: BE 

OF 

CO 

179 


STX 

$COOF 

ALTCHR 

0E1A: AE 

83 

CO 

180 


LDX 

*C083 

RD-LC 

0E1D: AE 

83 

CO 

181 


LDX 

$0083 

WR-LC 




182 

* 



4 




183 

* MOVE FP + MON <$1000-$3FFF> 




184 

* TO LANGUA6E 

CARD BANK 2 





185 

* 




0E20: A 9 

00 


186 


LDA 

#<FPBASIC1 



6.2.1 1. FASTBRUN-Routine (Apple 11 Plus Emulator fur He) 


195 


0E22 

85 

CE 


187 


STA 

IND1 

0E24 

A9 

10 


188 


LDA 

#>FPBASIC1 

0E26 

85 

CF 


189 


STA 

I ND 1+1 ' 

0E28 

A9 

00 


190 


LDA 

#<FPBASIC2 

0E2A 

85 

FE 


191 


STA 

IND2 

0E2C 

A9 

DO 


192 


LDA 

#>FPBASIC2 

0E2E 

85 

FF 


193 


STA 

IND2+1 

0E30 

AO 

00 


194 


LDY 

#0 

0E32 

B1 

CE 


195 

MOVE 

LDA 

<IND1) , Y 

0E34 

91 

FE 


196 


STA 

( IND2> , Y 

0E36 

C8 



197 


INY 


0E37 

DO 

F9 


198 


BNE 

MOVE 

0E39 

E6 

CF 


199 


INC 

IND1+1 

0E3B 

E6 

FF 


200 


INC 

1ND2+1 

0E3D 

DO 

F3 


201 


BNE 

MOVE 





202 

* 







203 

* MONITOR PATCHES 





204 

* 



0E3F: 

AD 

F5 

OE 

205 


LDA 

FD82 

0E42: 

8D 

82 

FD 

206 


STA 

$FD82 

0E45: 

AD 

F6 

OE 

207 


LDA 

FD82+1 

0E48 

8D 

83 

FD 

208 


STA 

$FD82+1 





209 

* 



0E4B: 

AD 

F7 

OE 

210 


LDA 

FD1 1 

0E4E: 

8D 

11 

FD 

21 1 


STA 

$FD1 1 

0E51 

AD 

F 8 

OE 

212 


LDA 

FD11+1 

0E54: 

8D 

12 

FD 

213 


STA 

$FD1 1+1 

0E57 : 

AD 

F9 

OE 

214 


LDA 

FD11+2 

0E5A: 

8D 

13 

FD 

215 


STA 

$FD1 1+2 

0E5D: 

AD 

FA 

OE 

216 


LDA 

FD11+3 

0E60: 

8D 

14 

FD 

217 


STA 

$FD1 1+3 





21B 

* 



0E63: 

AD 

FB 

OE 

219 


LDA 

FBB3 

0E66 : 

8D 

B3 

FB 

220 


STA 

$FBB3 





221 

* 



0E69 : 

AD 

FC 

OE 

222 


LDA 

FE80 

0E6C : 

BD 

80 

FE 

223 


STA 

$FE80 

0E6F : 

AD 

FD 

OE 

224 


LDA 

FE80+1 

0E72: 

8D 

81 

FE 

225 


STA 

$FE80+1 





226 

* 







22 "7 

* APPLESOFT PATCHES 





228 

* 



0E75: 

AD 

FE 

OE 

229 


LDA 

F277 

0E78: 

8D 

77 

F2 

230 


STA 

$F277 

0E7B: 

AD 

FF 

OE 

231 


LDA 

F277+1 

0E7E-. 

8D 

78 

F2 

232 


STA 

$F277+1 





233 

* 



0E8 1 : 

AD 

00 

OF 

234 


LDA 

F2B0 

0E84 : 

8D 

80 

F2 

235 


STA 

$F2B0 

0E87 : 

AD 

01 

OF 

236 


LDA 

F280+1 

0E8A: 

8D 

81 

F2 

237 


STA 

$F280+1 

0E8D: 

AD 

02 

OF 

238 


LDA 

F280+2 

0E90: 

BD 

82 

F2 

239 


STA 

$F280+2 

0E93 : 

AD 

03 

OF 

240 


LDA 

F280+3 


;<FFFF+1 


6. RWTS (Read-Write-Track-Sector) 
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OE96: 

8D 

83 

F2 

241 


STA 

*F280+3 

0E99 : 

AD 

04 

OF 

242 


LDA 

F280+4 

0E9C : 

8D 

84 

F2 

243 


STA 

SF280+4 





244 

* 



0E9F : 

AD 

05 

OF 

245 


LDA 

F 18 1 

0EA2: 

8D 

81 

F 1- 

246 


STA 

*F181 

OEA5 : 

AD 

06 

OF 

247 


LDA 

F181+1 

0EA8 : 

8D 

82 

FI 

248 


STA 

*F 181+1 

OEAB: 

AD 

07 

OF 

249 


LDA 

F181+2 

OEAE: 

8D 

83 

FI 

250 


STA 

*F181+2 

OEB1 : 

AD 

08 

OF 

251 


LDA 

F181+3 

0EB4: 

8D 

84 

FI 

252 


STA 

*F 18 1+3 

OEB7 : 

AD 

09 

OF 

253 


LDA 

F181+4 

OEBA : 

8D 

85 

FI 

254 


STA 

*F 181+4 

OEBD: 

AD 

OA 

OF 

255 


LDA 

F181+5 

OECO : 

8D 

86 

FI 

256 


STA 

*F181+5 

0EC3: 

AD 

OB 

OF 

257 


LDA 

F181+6 

0EC6 : 

8D 

87 

FI 

258 


STA 

*F181+6 





259 

* 







260 

* RESET 

PATCHES 





261 

* 



OEC9: 

AD 

F2 

03 

262 


LDA 

*03F2 

OECC: 

8D 

16 

OF 

263 


STA 

RESETOLD+1 

OECF : 

AD 

F3 

03 

264 


LDA 

*03F3 

OED2: 

8D 

17 

OF 

265 


STA 

RESETOLD+2 





266 

* 



0ED5 : 

A2 

OB 


267 


LDX 

#11 

OED7 : 

BD 

oc 

OF 

268 

RES 

LDA 

03C4 , X 

OEDA : 

9D 

C4 

03 

269 


STA 

*0304, X 

OEDD: 

CA 



270 


DEX 


OEDE: 

10 

F7 


271 


BF'L 

RES 





oyn 

* 



OEEO: 

AD 

18 

OF 

273 


LDA 

03F2 

OEE3: 

8D 

F2 

03 

274 


STA 

#03F2 

0EE6 : 

AD 

19 

OF 

275 


LDA 

Q3F2+1 

0EE9 : 

8D 

F3 

03 

276 


STA 

S03F2+1 

OEEC: 

AD 

1A 

OF 

277 


LDA 

03F2+2 

OEEF : 

8D 

F4 

03 

278 


STA 

f 03F2+2 





279 

* 



0EF2 : 

4C 

DO 

03 

280 


JMP 

DOSWARM 





281 

* 







282 

* MONITOR: 






283 

* 



0EF5: 

29 

FF 


284 

FD82 

AND 

#*FF ; CAPST 

OEF7: 

29 

7F 


285 

FD11 

AND 

#*7F ; RDKEY 

0EF9: 

EA 



286 


NOP 


OEFA: 

EA 



287 


NOP 


OEFB: 

06 



288 

FBB3 

HEX 

06 : VERS I ON 

OEFC: 

AO 

7F 


289 

FE80 

LDY 

#*7F : SETINV 





290 

* 







291 

* APPLESOFT: 






292 

* 



OEFE: 

A9 

7F 


293 

F277 

LDA 

#*7F ; INVERSE 

OFOO: 

A9 

7F 


294 

F280 

LDA 

#*7F 


6.2. 1 1 . FASTBRUN-Routine (Apple II Plus Emulator fur He) 
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0F02: 4C 

79 

F2 

295 


JMP 

*F279 

; FLASH 

0F05: A9 

CO 


296 

F181 

LDA 

#*C0 


0F07 : 85 

51 


297 


STA 

*51 


0F09: 4C 

95 

FI 

298 


JMP 

*F 1 95 

; HI MEM 




299 

* 







300 

* RESET 







301 

» 







302 

RESETNEW 

EQU 

*0304 

; 12BYTE 




303 

* 




OFOC: 8D 

OF 

CO 

304 

0304 

STA 

*C00F 

; ALTCHR 

OFOF : AD 

83 

CO 

305 


LDA 

*0083 

SRD-LC 

OF 1 2 : AD 

83 

CO 

306 


LDA 

*0083 

; WR-LC 

OF 1 5 : 40 

BF 

9D 

307 

RE5ET0LD 

JMP 

*9DBF 

: POKED ! 




308 

* 




OF 1 8 : 04 



309 

03F2 

DFB 

#< RESETNEW 


OF 19: 03 



310 


DFB 

# >RESETNEW 


OF 1 A : A6 



311 


DFB 

*03 ! *A5 

; PAGE 3 


— End assembly — 
535 bytes 
Errors: O 
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Anhang 


6502-Befehlslabelle 


Function 

Mnerron. 

Acc 

Op 

u. 

Cy 

Imm 

Op 

edl. 

Cy 

Zero 

Op 

kP. 

Cy 

Zero 

Op 

.X 

Cy 

Zero 

Op 

Y 

Cy 

APs 

Op 

oi. 

Cy 

Abs 

Op 

* 

Cy 

Abs 

Op 

,Y 

Cy 

flnd 

Op 

X) 

Cy 

find 

Op 

JuY 

Cy 

Imp 

Op 

ed 

Cy 

Bela 

0 1 

ive 

cy 

tndir 

Op 

ect 

Cy 

Status 

N Z C 1 D V 

Load 

LDA 

LDX 

LDY 



A9 

A2 

Ah 

2 

2 

? 

A5 

A6 

A4 

3 

3 

3 

B5 

R4 

4 

4 

B6 

4 

AD 

AE 

AC 

4 

4 

4 

BD 

BC 

4* 

4’ 

B9 

BE 

4* 

4' 

A1 

6 

B1 

5* 







NZ 

NZ 

NZ 

Store 

STA 

STX 

STY 





85 

86 
84 

3 

3 

3 

95 

94 

4 

4 

96 

4 

8D 

8E 

8C 

4 

4 

4 

9D 

5 

99 

5 

81 

6 

91 

6 








Transfer 

TAX 

TXA 

TAY 

TYA 





















AA 

8A 

A8 

98 

2 

2 

2 

2 





NZ 

NZ 

NZ 

NZ 

Stack Ptr 

TSX 





















BA 

9A 

2 

2 





N Z 

Stack 

PHA 

PLA 





















48 

68 

3 

4 





NZ 

Status R. 

PHP 

PLP 





















08 

28 

3 

4 





NZ C 1 D V 

Flags 

CLC 

SEC 

CU 

SEJ 

CLD 

SED 

CLV 





















18 

38 

58 

78 

D8 

F8 

B8 

2 

2 

2 

2 

2 

2 

2 






Jump 

JMP 

JSR 











4C 

20 

3 

6 













6C 

5 


Return 

RTS 

RTI 





















60 

40 

6 

6 





NZ Cl DV 

Compare 

CMP 

CPX 

CPY 

BIT 



G9 

EO 

CO 

2 

2 

2 

C5 

E4 

C4 

24 

3 

3 

3 

3 

D5 

4 



CD 

EC 

oc 

2C 

4 

4 

4 

4 

DD 

4* 

D9 

4* 

Cl 

6 

D1 

5* 







NZ C 

NZ C 

NZ C 

-Z 

Branch 

N=0 

Z=0 

C=0 

v-o 

BMI 

BPL 

BEQ 

BNE 

BCS 

BCC 

BVS 

BVC 























30 

10 

F0 

DO 

B0 

90 

70 

50 

2 + 
2 + 
2 + 
2 + 
2 + 
2 + 

2 + 



— 

Increment 

INC 

INX 

INY 





E6 

5 

F6 

6 



EE 

6 

FE 

7 







E8 

C8 

2 

2 





NZ 

NZ 

NZ 

Decrement 

DEC 

DEX 

DEY 





C6 

5 

D6 

6 



CE 

6 

DE 

7 







CA 

88 

2 

2 





NZ 

NZ 

NZ 

Add/Subt. 

ADC 

*SBC 



69 

F9 

2 

2 

65 

E5 

3 

3 

75 

F5 

4 

4 



6D 

ED 

4 

4 

7D 

FD 

4* 

4* 

79 

F9 

4* 

4* 

61 

El 

6 

6 

71 

FI 

5* 

5* 







NZ C V 

NZ C--V 

Boolean 

AND 

ORA 

EOR 



29 

09 

49 

2 

2 

7 

25 

05 

45 

3 

3 

3 

35 

15 

55 

4 

4 

4 



2D 

OD 

4D 

4 

4 

4 

3D 

ID 

5D 

4* 

4* 

4* 

39 

19 

59 

4* 

4* 

4* 

21 

01 

41 

6 

6 

6 

31 

11 

51 

5* 

5* 

5* 







NZ 

NZ 

NZ ~ 

Shift 

ASL 

LSR 

OA 

4A 

2 

7 



06 

46 

5 

5 

16 

56 

6 

6 



0E 

4E 

6 

6 

IE 

5E 

7 

7 













NZ C 

NZ C — 

Rotate 

ROL 

ROR 

2A 

nA 

2 

7 



26 

66 

5 

5 

36 

76 

6 

6 



2E 

6E 

6 

6 

3E 

7E 

7 

7 













NZ C 

nzc— : 

Miscell. 

NOP 

BRK 





















EA 

00 

2 

7 





— 1 — 

No. of Bytes 


1 


2 

2 

2 

2 

3 

3 

3 

2 

2 

1 

2 

3 




• =1 Takt mehr bei Seitenubergang; 

+ =2 Takte ohne Verzweigung, 3 Takte bei Verzweigung, 4 Takte bei Verzweigung mit Seitenubergang. 


ASCH-Tabelle 


§ 

00 

OOOOOOOO 

000 

§ 

40 

01000000 

064 

§ 

80 

10000000 

128 

§ 

CO 

1 1000000 

192 

A 

01 

0000000 1 

001 

A 

41 

01000001 

065 

A 

81 

10000001 

129 

A 

Cl 

11000001 

193 

B 

02 

00000010 

002 

B 

42 

01000010 

066 

B 

82 

10000010 

130 

B 

C2 

1 1000010 

194 

C 

03 

00000011 

003 

C 

43 

01000011 

067 

C 

83 

10000011 

131 

C 

C3 

n oooo n 

195 

D 

04 

00000100 

004 

D 

44 

01000100 

068 

D 

B4 

10000100 

132 

D 

C4 

11000100 

196 

E 

05 

00000101 

005 

E 

45 

01000101 

069 

E 

B5 

10000101 

133 

E 

C5 

1 1000101 

197 

F 

06 

000001 10 

006 

F 

46 

010001 10 

070 

F 

86 

10000110 

134 

F 

C6 

11000110 

198 

6 

07 

00000 111 

007 

G 

47 

01000111 

071 

G 

87 

10000 111 

135 

G 

C7 

11 000 111 

199 

H 

08 

00001000 

008 

H 

48 

01001000 

072 

H 

88 

10001000 

136 

H 

C8 

11001000 

200 

I 

09 

00001001 

009 

I 

49 

01001001 

073 

I 

89 

10001001 

137 

I 

C9 

11001001 

201 

J 

OA 

00001010 

010 

J 

4A 

01001010 

074 

J 

8A 

10001010 

138 

J 

CA 

n ooioio 

202 

K 

OB 

00001011 

on 

K 

4B 

01001011 

075 

K 

8B 

10001011 

139 

K 

CB 

11001011 

203 

L 

OC 

00001100 

012 

L 

4C 

01001100 

076 

L 

8C 

10001 100 

140 

L 

cc 

11001100 

204 

M 

OD 

00001 lOl 

013 

M 

4D 

01001101 

077 

M 

8D 

1 00011 01 

141 

N 

CD 

11001101 

205 

N 

OE 

00001110 

014 

N 

4E 

01001 1 10 

078 

N 

8E 

10001110 

142 

N 

CE 

nooino 

206 

O 

OF 

00001111 

015 

0 

4F 

01001111 

079 

0 

8F 

iooo nn 

143 

0 

CF 

11001111 

207 

P 

10 

00010000 

016 

P 

50 

01010000 

080 

F 

90 

10010000 

144 

P 

DO 

1 1010000 

208 

Q 

11 

00010001 

017 

Q 

51 

01010001 

081 

Q 

91 

10010001 

145 

Q 

D1 

11010001 

209 

R 

12 

00010010 

018 

R 

52 

01010010 

082 

R 

92 

10010010 

146 

R 

D2 

11010010 

210 

S 

13 

00010011 

019 

S 

53 

01010011 

083 

S 

93 

1001001 1 

147 

S 

D3 

11010011 

211 

T 

14 

00010100 

020 

T 

54 

01010100 

084 

T 

94 

10010100 

148 

T 

D4 

11010100 

212 

U 

15 

00010101 

021 

U 

55 

01010101 

085 

U 

95 

10010101 

149 

U 

D5 

11010101 

213 

V 

16 

00010110 

022 

V 

56 

01010110 

086 

V 

96 

10010110 

150 

V 

D6 

11010110 

214 

w 

1-7 

00010111 

023 

w 

57 

01010111 

087 

w 

97 

looiom 

151 

w 

D7 

11010111 

215 

X 

18 

00011000 

024 

X 

58 

01011000 

088 

X 

98 

10011000 

1 52 

X 

D8 

11011000 

216 

Y 

19 

00011001 

025 

Y 

59 

01011001 

089 

Y 

99 

1001 10C1 

1 53 

Y 

D9 

nonooi 

217 

z 

1A 

0001 1010 

026 

z 

5A 

01011010 

090 

Z 

9A 

10011010 

154 

z 

DA 

11011010 

218 

4 

IB 

00011011 

027 

4 

5B 

01011011 

091 

4 

9B 

loonon 

155 

4 

DB 

11011011 

219 

o 

1C 

00011100 

028 

o 

5C 

01011100 

092 

b 

9C 

10011100 

156 

5 

DC 

11011100 

220 

u 

ID 

00011101 

029 

u 

5D 

01011101 

093 

u 

9D 

10011101 

157 

Li 

DD 

11011101 

221 

t 

IE 

00011110 

030 

T 

5E 

01011110 

094 

t 

9E 

10011110 

158 

T 

DE 

11011110 

222 


IF 

00011111 

031 


5F 

oioi mi 

095 


9F 

10011 111 

159 


DF 

11011111 

223 


20 

00100000 

032 

* 

60 

01100000 

096 


AO 

10100000 

160 

c 

EO 

111 00000 

224 

j 

21 

00100001 

033 

a 

61 

01100001 

097 

! 

A1 

10100001 

161 

a 

El 

11100001 

225 

H 

22 

OO 1000 10 

034 

b 

62 

01 100010 

098 

" 

A2 

10100010 

162 

b 

E2 

11100010 

226 

# 

23 

00100011 

035 

c 

63 

01100011 

099 

# 

A3 

10100011 

163 

c 

E3 

11100011 

227 

* 

24 

00100100 

036 

d 

64 

01100100 

100 

$ 

A4 

10100100 

164 

d 

E4 

1 1100100 

228 

% 

25 

00100101 

037 

e 

65 

01100101 

101 

7. 

A5 

10100101 

165 

e 

E5 

11100101 

229 

S? 

26 

00100110 

038 

i 

66 

01100110 

102 


A6 

101001 10 

166 

f 

E6 

n loono 

230 

* 

27 

00100111 

039 

Q 

67 

01 10011 1 

1 03 


A7 

101001 1 1 

167 

g 

E7 

11100111 

231 

< 

28 

00101000 

040 

h 

68 

01101000 

104 

< 

A8 

10101000 

168 

h 

E8 

11101000 

232 

) 

29 

00101001 

041 

i 

69 

01101001 

105 

) 

A9 

10101001 

169 

i 

E9 

11101001 

233 

* 

2A 

00101010 

042 

j 

6A 

01101010 

106 

* 

AA 

10101010 

170 

j 

EA 

11101010 

234 

+ 

2B 

00101011 

043 

k 

6B 

01101011 

107 

+ 

AB 

10101011 

171 

k 

EB 

inoion 

235 

» 

2C 

00101100 

044 

1 

6C 

01101100 

108 

, 

AC 

10101100 

172 

1 

EC 

11101100 

236 

- 

2D 

00101101 

045 

m 

6D 

01101101 

109 

- 

AD 

10101101 

173 

m 

ED 

inonoi 

237 

. 

2E 

00101110 

046 

n 

6E 

01101110 

no 

. 

AE 

10101110 

174 

n 

EE 

11101110 

238 

/ 

2F 

00101111 

047 

□ 

6F 

01101111 

111 

/ 

AF 

10101111 

175 

o 

EF 

11101111 

239 

0 

30 

00110000 

048 

P 

70 

01110000 

112 

0 

BO 

10110000 

176 

P 

FO 

1 1 1 10000 

240 

1 

31 

00110001 

049 

q 

71 

01110001 

113 

1 

B1 

10110001 

177 

q 

FI 

11110001 

241 

2 

32 

00110010 

050 

r 

72 

01110010 

114 

2 

B2 

10110010 

178 

r 

F2 

11110010 

242 

3 

33 

00110011 

051 

5 

73 

01110011 

115 

3 

B3 

10110011 

179 

s 

F3 

11110011 

243 

4 

34 

00110100 

052 

t 

74 

01110100 

116 

4 

B4 

10110100 

180 

t 

F4 

11110100 

244 

5 

35 

00110101 

053 

u 

75 

01110101 

117 

5 

B5 

10110101 

181 

u 

F5 

11110101 

245 

6 

36 

00110110 

054 

V 

76 

01110110 

118 

6 

B6 

10110110 

182 

V 

F6 

nnono 

246 

7 

37 

00110111 

055 

w 

77 

01110111 

119 

7 

B7 

10110111 

183 

w 

F7 

11110111 

247 

8 

38 

00111000 

056 

X 

78 

01111000 

120 

8 

B8 

10111000 

184 

X 

F8 

11111000 

248 

9 

39 

00111001 

057 

y 

79 

01111001 

121 

9 

B9 

10111001 

185 

y 

F9 

11111001 

249 

: 

3A 

00111010 

058 

z 

7A 

01111010 

122 

: 

E<A 

10111010 

186 

z 

FA 

11 11 1010 

250 

; 

3B 

00111011 

059 

a 

7B 

01111011 

123 

5 

BB 

ioi non 

187 

a 

FB 

union 

251 

< 

3C 

00111100 

060 

d 

7C 

on ii ioo 

124 

< 

BC 

101 11100 

188 

b 

FC 

11111100 

252 

= 

3D 

00111101 

061 

ti 

7D 

01111101 

125 

= 

BD 

10111101 

1B9 

U 

FD 

11111101 

253 

> 

3E 

00111110 

062 

ft 

7E 

01111110 

126 

/ 

BE 

10111110 

190 

ft 

FE 

11111110 

254 

? 

$F 

00111111 

063 


7F 

01111111 

127 

? 

BF 

10111111 

191 


FF 

nnnn 

255 
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Register 


6502-Befehlstabelle 198 

A (= Adresse) 25 

A (= Applesoft) 24 

Anfiihrungszeichen 41 

APPEND 61 

APPEND- WRITE 61 

Apple 11 Plus Emulator 129 

Applewriter 1.1 Binarfile-Kon verier 40 

ASCII 32 

ASCIi-Tabelle 199 

B ( = Binarfile) 24 
Bad-Sector-Routine 124, 159 
Basicfile 23 
Befehlsname 11 
Big Mac 69 

Bildschirm-Speicherstellen, versteckte 88 

Binarfile 24 

Bit 7 12, 32 

Bit-Verschlusselung 72 

BLOAD 24, 90 

Bload-Finder 66 

Booten 6 

Boot-Programm 90 
BRUN24 
BSAVE 24 
Byte 5 

B(yte) 61, 65 
C (= Command) 22 


C600G 6 

CALL 1002 (DOS-Reconnect) 23, 83, 
103 

Carry-Flag 109 
CATALOG 8 
Catalog-Pause 86 
Catalog-Sektor 74 
Catalog-Spur 70 
CHAIN 27 

CHR$(13) + CHR$(4) 82 
CHR$(4) 13 
CHRS(4) allein 43, 65 
CHRS(X) 38 
CLOSE 27, 82 
Command Interpreter 105 
Controller 4 

Controller-Boot-Programm 90 
Corvus 17 

COUT ( = Character output) 87 
CPM-Refiner 97 

CSWL (= COUT Switch Low Byte) 
100 

Ctrl-0 31, 54, 58 
Ctrl-D 13, 33 
Ctrl-M 30 
Ctrl-P 6 
Cursor 6, 12 

D (= Drive) 15 
D$ 13 
Datei 2, 27 
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Dateiname 11 
Dateityp 70 

Datendiskette ohne DOS 125, 163 
Daten-Puffcr 77 
Datensatz 55 
Daten-Sektor 73, 75 
DCT (= Device Characteristics 
Table) 107 
DELETE 18 
direkte Befehle 12 
direkter Zugriff 54 
Disk-Comparer 124, 153 
Disk-Emulator 125 
Diskette 4 
Diskleser 121, 130 
Diversi-DOS 3, 47, 92, 126 
Doppelpunkt 41 

DOS ( = Disk Operating System) 2 
DOS auf Diskette Track 00-02 123 
DOSCOLD (= Kaltstart) 103 
DOS-Kopie Track 00-02 122, 150 
DOS-lose Datendiskette 125, 163 
DOSMOVER 126 

DOSMOVER-RAMDISK-Driver 125, 
170 

DOS-Output- Vektor-Anderung 101 
DOS-Vektoren 83, 100, 103 
DOSWARM (= Warmstart) 103 
Drive 4, 16 
Drive-Wechsel 45 

EOOO-Patch 84 
Endmarker 31, 54 
EXEC 66 

FASTBRUN-Routine 129, 191 
Fehlermeldung 109 
Fehlermeldungen 78 
Feld 31, 36, 55 
File 2 


File Manager 105 
File-Reader 128, 186 
Filz 5 

Formatierung 7 
FP 20 

FPBASIC 129, 191 

freie Sektoren auf der Diskette 92 

freie Stellen im DOS 89 

GET 31, 38, 65, 67, 82 
GETIOB 108 
GETLN 47, 52, 94 

Hello-Programm 8, 84 
HIMEM 20-21 
Hires-Bilder 83 

I(= Input) 22 
I (= Integer) 24 
IN 22 

indirekte Befehle 12, 15 
indirekter Zugriff 54 
INIT 7, 18, 87 
Initialisierung 7 
INPUT 34 
INPUT-Lhnge 39 
INT20 

Interleaving (= Skewing) 111 

„in use“-Lampchen 5 

inverse Dateinamen 90 

IOB (= Input-Output-Block) 107 

IOBWO? (= GETIOB) 108 

Kaltstart 103 
Kilobyte 6 
Kolon 41 

Komma 34, 36, 41 
Komma-Kolon-Test 42 
Kopierprogramm 10 


202 
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Kopierprogramm, 1 -Drive- Version 
122, 141 

Kopierprogramm, 2-Drive- Version 
121, 133 
Kopierschutz 91 

KSWL (= KEYIN Switch Low Byte) 
100 

L (= Lange) 25, 55 
Lange (ernes Binarfiles) 26, 90 
Language Card 7, 20, 47 
Laufwerk 4 
Laufwerkklappe 5 
Laufwerksgeschwindigkeit 4 
List-Maker 67 
List-Schutz 86 
LOAD 23 

„ Loch ’’-Kopierschutz 91 
LOCK 8 
Lock-Flag 70 
Low Byte first 25 

MAINRAM TO AUXRAM MOVER 
127, 177 
MAXF1LES 20 
Merge 45 
Merlin 69 
Mischen 45 

MMU ( = Memory Management 
Utilities) 125 
MON 22 

Motor ein- und ausschalten 89 
Mystery Parameter 86 

NEW 20 
NOMON 22 
NUL 32 

O ( = Output) 22 
ON ERROR 78 


OPEN 27 

OPEN-DELETE-OPEN 29 
OPEN-File 43 

OPEN-POSITION- WRITE 63 
OPEN-WRITE 28 

Page 3 (DOS-Vektoren) 103 
Parameter 15 
Patches 81 
POSITION 61 

Position, relative und absolute 62 

PR 6, 22 

PRINT 34 

Printer-Driver 101 

ProDOS 2 

Prompt 12 

Prozessor-Takte 111 

Pseudo-Disk 125 

Puffer 20-21, 77 

R (= Record) 56 

R (= relative Feldposition) 61 

RAM-Disk 125 

RAM-Disk-Driver 180 

Random-File 54, 127 

RDKE Y 94 

READ 27 

Record 55-57 

Registerprogramm 46 

RENAME 19 

Reset 5, 83 

Return 30, 59 

RUN 23 

RUN-Modus 12, 85 
RWTS (Read- Write-Track-Sector) 105 
RWTS-Anwendungsprogramme 121 
RWTS-Aufruf 109 
RWTS-Muster 110, 113 
RWTS-Parameter-Tabelle 107 
RWTS-Test mit Skewing 111, 119 


Register 


203 


RWTS-Test mit Warteschleife 111, 116 

S (= Slot) 15 
SAVE 23 
Schreibschutz 9 
Sektor 5 
Sektor-Offset 71 
Semikolon 30, 34, 38 
sequentielle Datci 54-55 
Skewing 111 
Slot 15-16 
Slot-Wechsel 45 
Speicherkapazitat 5 
Spur 5 

Startadresse 24-25 
Steckplatz 16 
String 28-39 
String-Lange 39 

T (= Textfile) 24 
TASC 27, 47, 95 
Tastaturabfrage 82 
Textfile 27 
Tips und Tricks 81 
Token 12 
Track 5 

Track-Sektor-Paare 72 

Track-Sektor-Tracer 73 

TSL (= Track-Sektor-Liste) 60, 70-71 

TSL -Maker 127, 184 

TSL-Puffer 77, 128 

TSL-Sektor 71, 74 

UNLOCK 9 
UNLOCK-Trick 127 

V (= Volume) 15 
Vektoren 100, 103 
VERIFY 9 
Volume 16 


vorformatierter Random-File 58 
VTOC-Sektor 74, 167, 173 
VTOC (= Volume Table of Contents) 
60, 72 

Warmstart 103, 110 
WRITE 27 

Zahlen 28, 33, 83 
Zero-Page 88 


Fehler-Nummern 

RWTS-Fehler-Codes 

08 = INIT-Fehler 
10 = schreibgeschiitzt 
20 = falsche Volume-Nummer 
40 = I/O-Fehler 

DOS-Fehler-Codes 

1 = LANGUAGE NOT AVAILABLE 

2 = RANGE ERROR 

3 “ RANGE ERROR 

4 = WRITE PROTECTED 

5 = END OF DATA 

6 = FILE NOT FOUND 

7 = VOLUME MISMATCH 

8 = I/O-ERROR 

9 = DISK FULL 

10 = FILE LOCKED 

11 = SYNTAX ERROR 

12 = NO BUFFERS AVAILABLE 

13 = FILE TYPE MISMATCH 

14 = PROGRAM TOO LARGE 

15 = NOT DIRECT COMMAND 


Apple ProDOS 

fiir Auf steiger 


Mit ausfuhrlichen 

Ulrich Strohl Programmbeispielen 



Apple ProDOS fiir Aufsteiger, Band 1 

Mit ausfuhrlichen Programmbeispielen 
von U. Stiehl 

1984, 208 S., kart., DM 28,- 
ISBN 3-7785-1027-4 

Begleitdiskette zu ,, Apple ProDOS fur Aufsteiger", 
DM 28,- 

ISBN 3-7785-1032-0 


„Apple ProDOS fur Aufsteiger, Band 2", 
ca. 180 S., kart., DM 28,-, 
erscheint im Oktober 1984. 

ISBN 3-7785-1036-3 

Begleitdiskette, DM 28,-, ISBN 3-7785-1040-1 


ProDOS ist das neue Betriebssystem fiir den Apple II Plus/lle. Applesoft-Program- 
mierer, die unter DOS 3.3 gearbeitet haben, werden sich schnell an ProDOS gewoh- 
nen, da ProDOS und DOS 3.3 in dieser Hinsicht weitgehend kompatibel sind. Dage- 
gen miissen Assembler-Programmierer vollig umdenken. Deshalb liegt das Schwer- 
gewicht von „Apple ProDOS fur Aufsteiger, Band 1 " auf der Assemblerprogram- 
mierung und der minutiosen Darstellung der ProDOS-internen Systemadressen, die 
jedoch auch fur Applesoft-Programmierer von groBer Bedeutung sind. 

Zunachst wird zunachst ein allgemeiner Uberblick uber das neue ,, Professional Disk 
Operation System" gegeben. Im AnschluB daran folgt eine Gegenuberstellung der 
Geschwindigkeit des Diskettenzugriffs bei DOS und ProDOS. Dann wird die interne 
Speicherorganisation detailliert beschrieben (Boot-Vorgang, Zero-Page, ProDOS- 
Vektoren, Basic-System-Puffer, Basic-System-Global-Page, Basic-Command-Hand- 
ler, l/O-Vektoren, ProDOS-Global-Page, Language-Card-Organisation, Interrupt, 
Disk-Driver, Reboot-Programm usw.). Ebenso ausfuhrlich wird die externe Speicher- 
organisation geschildert (Spuren, Sektoren, Blocks, Directory-Struktur, Volume Bit 
Map, Dateistrukturen usw.). SchlieBlich wird das MLI (Machine Language Interface) 
mit zahlreichen praktischen Anwendungsbeispielen erlautert. Insgesamt enthalt 
ProDOS-Buch ca. 70 Seiten mit eigens fur dieses Werk entwickelten Programmen. 
Danach wird das Basic-System technisch fiir fortgeschrittene Applesoft-Program- 
mierer kurz erlautert. 

„ProD0S fur Aufsteiger, Band 2" beschreibt ausfuhrlich die Anwendung des ProDOS- 
BASIC-SYSTEM fiir Applesoft-Programmierer und enthalt daruber hinaus zahlreiche 
groBere Assembler-Anwenderprogramme, die aus Platzgrunden in dem ersten Band 
nicht mehr untergebracht werden konnten. 



ProDOS-Editor 1 .0 

Applesoft-Editor 

unter ProDOS-Betriebssystem 

von U. Stiehl 

1984, Diskette und Manual, DM 98,- 
ISBN 3-7785-1 024-X 


Mit diesem neuen Editor — ubrigens der bislang einzige deutsche ProDOS-Editor — 
wird dem Applesoft-Programmierer ein Werkzeug zur effektiven Programmierung 
unter dem Betriebssystem ProDOS gegeben, denn die fruheren Editoren sind alle- 
samt unter ProDOS nicht mehr lauffahig. 

Unter anderen sind folgende Features implementiert worden: 

- Zeilenorientierter Editor mit jedem erdenklichen Redigierkomfort (Insert, Delete, 
Tab, Restore, freie Cursorbewegung in alien vier Richtungen, Eingabe von Ctrl- 
Buchstaben in Applesoft-Zeilen usw.) 

- Renumber (Zeilen-Umnumerierung) 

- Xreference (sortierte Variablenliste) 

- Suchen von Tokens, Strings und Variablen 

- dezimale und hexadezimale Umrechnung 

- Ausfuhrung von Monitorbefehlen aus dem Editor heraus 

- Listen des Applesoft-Programms in speicherinterner Form als Hex-Dump 

- Suchen von Hex-Folgen, Adressen Oder Speicherstellen im gesamten RAM-Be- 
reich einschlieBlich der Language Card 

- frei definierbare Tastatur-Macrobefehle 

- Block-Dump (Einlesen und Speichern von ProDOS-Diskettenblocks) 

Der Applesoft-Editor liegt in einem von ProDOS geschutzten Bereich und laBt sich 
per Tastendruck voriibergehend abschalten und ebenso einfach wieder aktivieren. 





Begleitdiskette 
zu „Apple DOS 3.3 — 
Tips und Tricks" 

DM 28,— 

ISBN 3-7785-1032-0 


A 002 STIEHL 
T 004 BLOAD-FINDER 
T 003 LIST-MAKER 
B 004 TRACK-SECTOR-TRACER.S 
T 004 T. TRACK-SECTOR-TRACER 
B 002 TRACK-SECTOR-TRACER 
P 003 FREIE SEKTOREN. S 
T 002 T.FREIE SEKTOREN 
B 002 FREIE SEKTOREN 
B 006 FUSION-TASC.S 
T 006 J.FUSION-TASC 
B 002 FUSION-TASC 
A 004 CPM-REFINER 
B 006 CPM-REFINER. OBJ.S 
T 006 T.CPM-REFINER.OBJ 
B 002 CPM-REFINER. OBJ 
B 008 DOS-OUTPUT-VEKTOR.S 
T 008 T. DOS- OUTPUT- VEKTOR 
B 002 DOS-OUTPUT-VEKTOR 
B 011 RWTS-MUSTER.S 
T 011 T.RWTS-MUSTER 
B 002 RWTS-MUSTER 
B 009 RWTS-TEST.WARTESCHLEIFE.S 
T 009 T.RWTS-TEST.WARTESCHLEIFE 
B 002 RWTS-TEST.WARTESCHLEIFE 
B 005 RWTS-TEST.SKEWING.S 
T 005 T.RWTS-TEST. SKEWING 
B 002 RWTS-TEST.SKEWING 
A 004 DISKLESER 
B 007 DISKLESER. OBJ.S 
T 007 T. DISKLESER. OBJ 
B 002 DISKLESER. OBJ 


B 018 KOPIERPROGRAMM.2DRIVE.S 
T 018 T.KOPIERPROGRAMM.2DRIVE 
B 004 KOPIERPROGRAMM.2DRIVE 
B 020 KOPIERPROGRAMM.1 DRIVE. S 
T 020 T. KOPIERPROGRAMM.1 DRIVE 
B 005 KOPIERPROGRAMM.1 DRIVE 
B 008 DOS-KOPI E-TRACK 00-02.S 
T 008 T. DOS-KOPI E-TRACK 00-02 
B 002 DOS-KOPIE-TRACK 00-02 
B 017 DISK-COMPARER.S 
T 017 T. DISK-COMPARER 
B 004 DISK-COMPARER 
B 010 BAD-SECTOR-ROUTINE.S 
T 010 T. BAD-SECTOR-ROUTINE 
B 003 BAD-SECTOR-ROUTINE 
B 017 DOS-LOSE DATENDISKETTE.S 
T '017 T.DOS-LOSE DATENDISKETTE 
B 004 DOS-LOSE DATENDISKETTE 
B 039 DOSMOVER-RAMDISK-DRIVER.S 
T 039 T.DOSMOVER-RAMDISK-DRIVER 
B 006 DOSMOVER-RAMDISK-DRIVER 
A 003 TSL-MAKER 
B 007 TSL-MAKER. OBJ.S 
T 007 T.TSL-MAKER.OBJ 
B 002 TSL-MAKER. OBJ 
A 004 FILE-READER 
B 013 FILE-READER. OBJ.S 
T 013 T. FILE-READER. OBJ 
B 003 FILE-READER. OBJ 
B 018 FASTBRUN-ROUTINE.S 
T 018 T.FASTBRUN-ROUTINE 
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Diese Buchreihe befaBt sich mit dem Datenbanksystem dBASE II, 
einem speziell fur Mikrocomputer entwickeltem System. Dieses Da- 
tenbanksystem lauft unter den Betriebssystemen CP/M, MP/M, 
MS-DOS und PC-DOS. 

Urn den Anfanger den Elnstieg in dieses doch recht machtige 
Software-Werkzeug zu erleichtern, werden in den beiden ersten auf- 
einander abgestimmten Banden jeweils die zu einem bestimmten Lei- 
stungsbereich gehorenden Kommandos herausgefiltert und erlautert. 
Zusatzlich sind kleine Aufgaben integriert, an denen der Leser theore- 
tisch oder/und praktisch selnen Kenntnisstand von dBASE II uberpru- 
fen kann. Im dritten Band erfolgt dann eine Darstellung der verschie- 
densten Einsatzmoglichkeiten von dBASE II. 

Der vorliegende 1. Band dieser Einfuhrung befaBt sich mit der reinen 
Dialogarbeit in dBASE II. In kleinen, methodisch aufeinander abge- 
stimmten Kapiteln erfahrt der Leser die wichtigsten dBASE II- 
Kommandos, um kleine Aufgaben der Datenverwaltung selbstandig 
losen zu konnen. 
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Aus dem Inhalt: 

Befehle zum Erfassen, Anzeigen von Listen und Daten • Andern, Kopie- 
ren und Sortieren von Datenbankinhalten • Zeichen(ketten)-Bearbei- 
tung in dBASE II • Arbeiten mit indizierten Datenbanken in dBASE II • 
Loschen und Andern von Datensatzen, Dateien und Datenbankstruk- 
turen • Erstellung von Summen und Berichten • Verandern von 
dBASE ll-Systemeinstellungen • Durcbfuhrung und Erstellung von 
Kommando-Dateien • Weitere dBASE ll-Anweisungen 
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INPUT 2.0 

Ein Bildschirm-Maskengenerator 
fur DOS 3.3 und ProDOS 

von U. Stiehl 

1984, Diskette und Manual, DM 98,- 
ISBN 3-7785-1021-5 


Der fur den Apple II bestimmte Maskengenerator ,, Input 2.0" basiert auf den fruhe- 
ren Programmen „lnput 1.0" und „lnput80 1.0" (von denen noch Restbestande 
lieferbar sind) und ist sowohl unter DOS 3.3 wie auch unter dem neuen ProDOS 
lauffahig. Der Maskengenerator setzt einen Apple II Plus mit Language Card Oder ei- 
nen Apple lie voraus. Im 40 Z/Z-Modus funktioniert er auf beiden Geratetypen, im 
80 Z/Z-Modus dagegen nur auf dem Apple lie mit 80-Zeichen-Karte. (Die alte Videx- 
Karte fur den Apple II wird nicht unterstutzt!) 

jnput 2.0" liegt wahlweise in der Bank 1 Oder Bank 2 der Language Card und wird 
durch einen kurzen Driver in den unteren 48 K aufgerufen. Jnput 2.0" lalSt sich pro- 
blemlos in nicht-compilierte und compilierte Applesoft- sowie in Assemblerpro- 
gramme einbinden. Die Ubergabe der Feldinhalte an das Anwenderprogramm erfolgt 
durch ein einfaches Verfahren, das auch bei Compilern funktioniert. 

Fur jedes Feld der Bildschirmmaske lassen sich u. a. definieren: Feldlange (bis zu 
255 Zeichen) - Vtab - Htab - Datentyp (insgesamt 8 Typen) - Scrollflag (starre 
Oder dynamische Maske) - Ctrlflag - Fullflag - Loschflag - Bildschirmflag (40- 
oder 80-Z-Darstellung). Innerhalb eines Eingabefeldes besteht jeder denkbare Redi- 
gierkomfort (Insert, Delete, Rubout, Restore usw.). 

Bei der neuen Version des Maskengenerators konnen jetzt auch Ctrl-Zeichen beim 
Datentyp String eingegeben werden. Ferner sind - dies gilt nur fur lie die Apfel- 
tasten als schnelle Cursortasten definiert. SchlielSlich wurden Features implemen- 
tiert, die den Einsatz von Jnput 2.0" als zeilenorientiertes Textverarbeitungspro- 
gramm ermoglichen. Die Jnput 2.0"-Diskette enthalt zahlreiche Demos zur Veran- 
schaulichung der Anwendung. 
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Softbreaker 1.0 

Eine softwaremafSige Interrupt-Utility 
fur die Apple lie 64K-Karte 

von U. Stiehl 

1984, Diskette und Manual, DM 48,- 
ISBN 3-7785-1022-3 


„Softbreaker" ist ein Assemblerprogramm, mit dessen Hilfe Programme, die sich 
von der 64K-Karte (= Extended 80 Column Card fur den Apple lie) starten lassen, 
unterbrochen, gespeichert, geladen und exakt an der Stelle der Unterbrechung fort- 
gefuhrt werden konnen. Dadurch ist es auch moglich, Sicherungskopien von soge- 
nannten kopiergeschutzten Programmen herzustellen. Es sei hier ausdrucklich dar- 
auf hingewiesen, daS laut Urheberrechtsgesetz die Herstellung von Vervielfalti- 
gungsstiicken nur von rechtmalSig erworbenen Werken und nur zum personlichen 
Gebrauch zulassig ist. 

„Softbreaker" latet sich bei folgenden Programmtypen anwenden: 

- bei grundsatzlich alien fur den Apple II Plus konzipierten Programmen, die die 
40-Zeichen-Darstellung und/oder die Grafikseite 1 (also nicht HGR2) benutzen, 
gleichviel ob sie durch Reset abgesichert sind oder nicht. 

- bei grundsatzlich alien durch Reset abgesicherten Programmen, auch wenn sie 
die 80-Zeichen-Darstellung benutzen. 

Softbreaker funktioniert selbstverstandlich nicht bei Programmen, die die 64K-Karte 
des Apple lie in irgendeiner Form benutzen, z. B. nicht bei Programmen, die die 64 K- 
Karte als RAM-Disk oder als Zusatzspeicher verwenden. 

Mit Softbreaker unterbrochene Programme werden komplett, d. h. die ganzen 64 K 
einschlielSlich Language Card, in nur ca. 1 1 Sekunden auf einer formatierten Dis- 
kette gesichert, wobei die Rucksprungadresse und diverse Status-Werte automa- 
tisch mit abgespeichert werden, so daS keinerlei technischen oder Programmier- 
kenntnisse erforderlich sind. 


MMU 2.0 

Memory Managements Utilities 

fur die Apple lie 64K-Karte 
DOS 3.3 (und ProDOS) 
von U. Stiehl 

1 984, Diskette und Manual, DM 98, - 
ISBN 3-7787-1023-1 


Bei der Version 2.0 der MMU's sind die Utilities teilweise so umgeschrieben wor- 
den, daft sie sowohl unter DOS 3.3 als auch unter ProDOS lauffahig sind. Da dies 
nicht immer moglich war, sind zusatzlich zu den reinen DOS-Hilfsprogrammen, spe- 
ziell den RAM-Disk-Drivern, einige reine ProDOS-Utilities aufgenommen worden. 
Insgesamt enthalt die neue „MMU 2.0"-Diskette uber 25 Programme, die neue Ein- 
satzmoglichkeiten fur die Extended 80 Column Card (erweiterte 80-Z-Karte = 64 K- 
Karte fur den Apple lie) erschlielSen, Ein Teil der Programme laufen auch auf dem 
Apple II Plus, doch ist „MMU 2.0" primar fur 64K-Karte-Besitzer gedacht. 

Im einzelnen umfalSt ,,MMU 2.0" 

- Drei RAM-Disk-Driver fur DOS 3.3: ,,INIT62" benutzt nur die 64K-Karte als 
RAM-Disk, ,,INIT78" benutzt zusatzlich die Motherboard-LC als RAM-Karte und 
,,DOSMOVER. INIT62" gilt fur den Fall, dalS sich das DOS selbst in der Mother- 
board-LC befindet. 

- Eine sehr nutzliche Pseudo-Coprocessor-Utility, die das Hin- und Herschalten 
zwischen zwei Programm-Modulen ermoglicht, von denen sich das eine Modul 
auf der 64K-Karte befindet. 

- Zwei schnelle Kopierprogramme (fur DOS 3.3 und ProDOS). 

- Mehrere Move-Programme zum Verschieben von Daten auf die 64K-Karte so- 
wie auf die Language Card und umgekehrt. 

Mehrere Hilfsprogramme zum Untersuchen und Loschen bestimmter Speicher- 
bereiche der 64K-Karte und der LC, zur Ermittlung des Softswitch-Status usw. 

- Zwei Simulator-Programme zum Simulieren von Apple II und Apple II Plus auf 
dem Apple lie. 

SchlielSlich enthalt ,,MMU 2.0" auch verschiedene Move-Utilities fur die RAM-Kar- 
ten AP20 und API 7 der Firma IBS. 



MMU 



